home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 11 / AMUG BBS in a Box Volume XI (April 1994) (MacWizards).iso / Files / Prog / B-C / B-YACC.sit / berkeley-yacc-mpw / lr0.c < prev    next >
MacBinary  |  1991-10-14  |  12.0 KB  |  [TEXT/MPS ]

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: lr0.c

ConfidenceProgramDetectionMatch TypeSupport
66% dexvert Compact Compressed (Unix) (archive/compact) ext Supported
10% dexvert MacBinary (archive/macBinary) fallback Supported
10% dexvert Jesper Olsen Module (music/jesperOlsen) magic Supported
1% dexvert Text File (text/txt) fallback Supported
100% file MacBinary II, Mon Oct 14 22:49:38 1991, modified Mon Oct 14 22:49:38 1991, creator 'MPS ', type ASCII, 11598 bytes "lr0.c" , at 0x2dce 428 bytes resource default (weak)
99% file data default
49% TrID Macintosh plain text (MacBinary) default
33% TrID TTComp archive compressed (bin-2K) default (weak)
16% TrID MacBinary 2 default (weak)
0% TrID Sybase iAnywhere database files default (weak)
100% siegfried fmt/1762 MacBinary (II) default
100% lsar MacBinary default


id metadata
keyvalue
macFileType[TEXT]
macFileCreator[MPS ]



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 05 6c 72 30 2e 63 00 | 00 00 00 00 00 00 00 00 |..lr0.c.|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 00 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 2d 4e 00 | 00 01 ac a5 20 07 c2 a5 |.....-N.|.... ...|
|00000060| 20 07 c2 00 00 00 00 00 | 00 00 00 00 00 00 00 00 | .......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 33 4e 00 00 |........|....3N..|
|00000080| 2f 2a 0d 20 2a 20 43 6f | 70 79 72 69 67 68 74 20 |/*. * Co|pyright |
|00000090| 28 63 29 20 31 39 38 39 | 20 54 68 65 20 52 65 67 |(c) 1989| The Reg|
|000000a0| 65 6e 74 73 20 6f 66 20 | 74 68 65 20 55 6e 69 76 |ents of |the Univ|
|000000b0| 65 72 73 69 74 79 20 6f | 66 20 43 61 6c 69 66 6f |ersity o|f Califo|
|000000c0| 72 6e 69 61 2e 0d 20 2a | 20 41 6c 6c 20 72 69 67 |rnia.. *| All rig|
|000000d0| 68 74 73 20 72 65 73 65 | 72 76 65 64 2e 0d 20 2a |hts rese|rved.. *|
|000000e0| 0d 20 2a 20 54 68 69 73 | 20 63 6f 64 65 20 69 73 |. * This| code is|
|000000f0| 20 64 65 72 69 76 65 64 | 20 66 72 6f 6d 20 73 6f | derived| from so|
|00000100| 66 74 77 61 72 65 20 63 | 6f 6e 74 72 69 62 75 74 |ftware c|ontribut|
|00000110| 65 64 20 74 6f 20 42 65 | 72 6b 65 6c 65 79 20 62 |ed to Be|rkeley b|
|00000120| 79 0d 20 2a 20 52 6f 62 | 65 72 74 20 50 61 75 6c |y. * Rob|ert Paul|
|00000130| 20 43 6f 72 62 65 74 74 | 2e 0d 20 2a 0d 20 2a 20 | Corbett|.. *. * |
|00000140| 52 65 64 69 73 74 72 69 | 62 75 74 69 6f 6e 20 61 |Redistri|bution a|
|00000150| 6e 64 20 75 73 65 20 69 | 6e 20 73 6f 75 72 63 65 |nd use i|n source|
|00000160| 20 61 6e 64 20 62 69 6e | 61 72 79 20 66 6f 72 6d | and bin|ary form|
|00000170| 73 2c 20 77 69 74 68 20 | 6f 72 20 77 69 74 68 6f |s, with |or witho|
|00000180| 75 74 0d 20 2a 20 6d 6f | 64 69 66 69 63 61 74 69 |ut. * mo|dificati|
|00000190| 6f 6e 2c 20 61 72 65 20 | 70 65 72 6d 69 74 74 65 |on, are |permitte|
|000001a0| 64 20 70 72 6f 76 69 64 | 65 64 20 74 68 61 74 20 |d provid|ed that |
|000001b0| 74 68 65 20 66 6f 6c 6c | 6f 77 69 6e 67 20 63 6f |the foll|owing co|
|000001c0| 6e 64 69 74 69 6f 6e 73 | 0d 20 2a 20 61 72 65 20 |nditions|. * are |
|000001d0| 6d 65 74 3a 0d 20 2a 20 | 31 2e 20 52 65 64 69 73 |met:. * |1. Redis|
|000001e0| 74 72 69 62 75 74 69 6f | 6e 73 20 6f 66 20 73 6f |tributio|ns of so|
|000001f0| 75 72 63 65 20 63 6f 64 | 65 20 6d 75 73 74 20 72 |urce cod|e must r|
|00000200| 65 74 61 69 6e 20 74 68 | 65 20 61 62 6f 76 65 20 |etain th|e above |
|00000210| 63 6f 70 79 72 69 67 68 | 74 0d 20 2a 20 20 20 20 |copyrigh|t. * |
|00000220| 6e 6f 74 69 63 65 2c 20 | 74 68 69 73 20 6c 69 73 |notice, |this lis|
|00000230| 74 20 6f 66 20 63 6f 6e | 64 69 74 69 6f 6e 73 20 |t of con|ditions |
|00000240| 61 6e 64 20 74 68 65 20 | 66 6f 6c 6c 6f 77 69 6e |and the |followin|
|00000250| 67 20 64 69 73 63 6c 61 | 69 6d 65 72 2e 0d 20 2a |g discla|imer.. *|
|00000260| 20 32 2e 20 52 65 64 69 | 73 74 72 69 62 75 74 69 | 2. Redi|stributi|
|00000270| 6f 6e 73 20 69 6e 20 62 | 69 6e 61 72 79 20 66 6f |ons in b|inary fo|
|00000280| 72 6d 20 6d 75 73 74 20 | 72 65 70 72 6f 64 75 63 |rm must |reproduc|
|00000290| 65 20 74 68 65 20 61 62 | 6f 76 65 20 63 6f 70 79 |e the ab|ove copy|
|000002a0| 72 69 67 68 74 0d 20 2a | 20 20 20 20 6e 6f 74 69 |right. *| noti|
|000002b0| 63 65 2c 20 74 68 69 73 | 20 6c 69 73 74 20 6f 66 |ce, this| list of|
|000002c0| 20 63 6f 6e 64 69 74 69 | 6f 6e 73 20 61 6e 64 20 | conditi|ons and |
|000002d0| 74 68 65 20 66 6f 6c 6c | 6f 77 69 6e 67 20 64 69 |the foll|owing di|
|000002e0| 73 63 6c 61 69 6d 65 72 | 20 69 6e 20 74 68 65 0d |sclaimer| in the.|
|000002f0| 20 2a 20 20 20 20 64 6f | 63 75 6d 65 6e 74 61 74 | * do|cumentat|
|00000300| 69 6f 6e 20 61 6e 64 2f | 6f 72 20 6f 74 68 65 72 |ion and/|or other|
|00000310| 20 6d 61 74 65 72 69 61 | 6c 73 20 70 72 6f 76 69 | materia|ls provi|
|00000320| 64 65 64 20 77 69 74 68 | 20 74 68 65 20 64 69 73 |ded with| the dis|
|00000330| 74 72 69 62 75 74 69 6f | 6e 2e 0d 20 2a 20 33 2e |tributio|n.. * 3.|
|00000340| 20 41 6c 6c 20 61 64 76 | 65 72 74 69 73 69 6e 67 | All adv|ertising|
|00000350| 20 6d 61 74 65 72 69 61 | 6c 73 20 6d 65 6e 74 69 | materia|ls menti|
|00000360| 6f 6e 69 6e 67 20 66 65 | 61 74 75 72 65 73 20 6f |oning fe|atures o|
|00000370| 72 20 75 73 65 20 6f 66 | 20 74 68 69 73 20 73 6f |r use of| this so|
|00000380| 66 74 77 61 72 65 0d 20 | 2a 20 20 20 20 6d 75 73 |ftware. |* mus|
|00000390| 74 20 64 69 73 70 6c 61 | 79 20 74 68 65 20 66 6f |t displa|y the fo|
|000003a0| 6c 6c 6f 77 69 6e 67 20 | 61 63 6b 6e 6f 77 6c 65 |llowing |acknowle|
|000003b0| 64 67 65 6d 65 6e 74 3a | 0d 20 2a 09 54 68 69 73 |dgement:|. *.This|
|000003c0| 20 70 72 6f 64 75 63 74 | 20 69 6e 63 6c 75 64 65 | product| include|
|000003d0| 73 20 73 6f 66 74 77 61 | 72 65 20 64 65 76 65 6c |s softwa|re devel|
|000003e0| 6f 70 65 64 20 62 79 20 | 74 68 65 20 55 6e 69 76 |oped by |the Univ|
|000003f0| 65 72 73 69 74 79 20 6f | 66 0d 20 2a 09 43 61 6c |ersity o|f. *.Cal|
|00000400| 69 66 6f 72 6e 69 61 2c | 20 42 65 72 6b 65 6c 65 |ifornia,| Berkele|
|00000410| 79 20 61 6e 64 20 69 74 | 73 20 63 6f 6e 74 72 69 |y and it|s contri|
|00000420| 62 75 74 6f 72 73 2e 0d | 20 2a 20 34 2e 20 4e 65 |butors..| * 4. Ne|
|00000430| 69 74 68 65 72 20 74 68 | 65 20 6e 61 6d 65 20 6f |ither th|e name o|
|00000440| 66 20 74 68 65 20 55 6e | 69 76 65 72 73 69 74 79 |f the Un|iversity|
|00000450| 20 6e 6f 72 20 74 68 65 | 20 6e 61 6d 65 73 20 6f | nor the| names o|
|00000460| 66 20 69 74 73 20 63 6f | 6e 74 72 69 62 75 74 6f |f its co|ntributo|
|00000470| 72 73 0d 20 2a 20 20 20 | 20 6d 61 79 20 62 65 20 |rs. * | may be |
|00000480| 75 73 65 64 20 74 6f 20 | 65 6e 64 6f 72 73 65 20 |used to |endorse |
|00000490| 6f 72 20 70 72 6f 6d 6f | 74 65 20 70 72 6f 64 75 |or promo|te produ|
|000004a0| 63 74 73 20 64 65 72 69 | 76 65 64 20 66 72 6f 6d |cts deri|ved from|
|000004b0| 20 74 68 69 73 20 73 6f | 66 74 77 61 72 65 0d 20 | this so|ftware. |
|000004c0| 2a 20 20 20 20 77 69 74 | 68 6f 75 74 20 73 70 65 |* wit|hout spe|
|000004d0| 63 69 66 69 63 20 70 72 | 69 6f 72 20 77 72 69 74 |cific pr|ior writ|
|000004e0| 74 65 6e 20 70 65 72 6d | 69 73 73 69 6f 6e 2e 0d |ten perm|ission..|
|000004f0| 20 2a 0d 20 2a 20 54 48 | 49 53 20 53 4f 46 54 57 | *. * TH|IS SOFTW|
|00000500| 41 52 45 20 49 53 20 50 | 52 4f 56 49 44 45 44 20 |ARE IS P|ROVIDED |
|00000510| 42 59 20 54 48 45 20 52 | 45 47 45 4e 54 53 20 41 |BY THE R|EGENTS A|
|00000520| 4e 44 20 43 4f 4e 54 52 | 49 42 55 54 4f 52 53 20 |ND CONTR|IBUTORS |
|00000530| 60 60 41 53 20 49 53 27 | 27 20 41 4e 44 0d 20 2a |``AS IS'|' AND. *|
|00000540| 20 41 4e 59 20 45 58 50 | 52 45 53 53 20 4f 52 20 | ANY EXP|RESS OR |
|00000550| 49 4d 50 4c 49 45 44 20 | 57 41 52 52 41 4e 54 49 |IMPLIED |WARRANTI|
|00000560| 45 53 2c 20 49 4e 43 4c | 55 44 49 4e 47 2c 20 42 |ES, INCL|UDING, B|
|00000570| 55 54 20 4e 4f 54 20 4c | 49 4d 49 54 45 44 20 54 |UT NOT L|IMITED T|
|00000580| 4f 2c 20 54 48 45 0d 20 | 2a 20 49 4d 50 4c 49 45 |O, THE. |* IMPLIE|
|00000590| 44 20 57 41 52 52 41 4e | 54 49 45 53 20 4f 46 20 |D WARRAN|TIES OF |
|000005a0| 4d 45 52 43 48 41 4e 54 | 41 42 49 4c 49 54 59 20 |MERCHANT|ABILITY |
|000005b0| 41 4e 44 20 46 49 54 4e | 45 53 53 20 46 4f 52 20 |AND FITN|ESS FOR |
|000005c0| 41 20 50 41 52 54 49 43 | 55 4c 41 52 20 50 55 52 |A PARTIC|ULAR PUR|
|000005d0| 50 4f 53 45 0d 20 2a 20 | 41 52 45 20 44 49 53 43 |POSE. * |ARE DISC|
|000005e0| 4c 41 49 4d 45 44 2e 20 | 20 49 4e 20 4e 4f 20 45 |LAIMED. | IN NO E|
|000005f0| 56 45 4e 54 20 53 48 41 | 4c 4c 20 54 48 45 20 52 |VENT SHA|LL THE R|
|00000600| 45 47 45 4e 54 53 20 4f | 52 20 43 4f 4e 54 52 49 |EGENTS O|R CONTRI|
|00000610| 42 55 54 4f 52 53 20 42 | 45 20 4c 49 41 42 4c 45 |BUTORS B|E LIABLE|
|00000620| 0d 20 2a 20 46 4f 52 20 | 41 4e 59 20 44 49 52 45 |. * FOR |ANY DIRE|
|00000630| 43 54 2c 20 49 4e 44 49 | 52 45 43 54 2c 20 49 4e |CT, INDI|RECT, IN|
|00000640| 43 49 44 45 4e 54 41 4c | 2c 20 53 50 45 43 49 41 |CIDENTAL|, SPECIA|
|00000650| 4c 2c 20 45 58 45 4d 50 | 4c 41 52 59 2c 20 4f 52 |L, EXEMP|LARY, OR|
|00000660| 20 43 4f 4e 53 45 51 55 | 45 4e 54 49 41 4c 0d 20 | CONSEQU|ENTIAL. |
|00000670| 2a 20 44 41 4d 41 47 45 | 53 20 28 49 4e 43 4c 55 |* DAMAGE|S (INCLU|
|00000680| 44 49 4e 47 2c 20 42 55 | 54 20 4e 4f 54 20 4c 49 |DING, BU|T NOT LI|
|00000690| 4d 49 54 45 44 20 54 4f | 2c 20 50 52 4f 43 55 52 |MITED TO|, PROCUR|
|000006a0| 45 4d 45 4e 54 20 4f 46 | 20 53 55 42 53 54 49 54 |EMENT OF| SUBSTIT|
|000006b0| 55 54 45 20 47 4f 4f 44 | 53 0d 20 2a 20 4f 52 20 |UTE GOOD|S. * OR |
|000006c0| 53 45 52 56 49 43 45 53 | 3b 20 4c 4f 53 53 20 4f |SERVICES|; LOSS O|
|000006d0| 46 20 55 53 45 2c 20 44 | 41 54 41 2c 20 4f 52 20 |F USE, D|ATA, OR |
|000006e0| 50 52 4f 46 49 54 53 3b | 20 4f 52 20 42 55 53 49 |PROFITS;| OR BUSI|
|000006f0| 4e 45 53 53 20 49 4e 54 | 45 52 52 55 50 54 49 4f |NESS INT|ERRUPTIO|
|00000700| 4e 29 0d 20 2a 20 48 4f | 57 45 56 45 52 20 43 41 |N). * HO|WEVER CA|
|00000710| 55 53 45 44 20 41 4e 44 | 20 4f 4e 20 41 4e 59 20 |USED AND| ON ANY |
|00000720| 54 48 45 4f 52 59 20 4f | 46 20 4c 49 41 42 49 4c |THEORY O|F LIABIL|
|00000730| 49 54 59 2c 20 57 48 45 | 54 48 45 52 20 49 4e 20 |ITY, WHE|THER IN |
|00000740| 43 4f 4e 54 52 41 43 54 | 2c 20 53 54 52 49 43 54 |CONTRACT|, STRICT|
|00000750| 0d 20 2a 20 4c 49 41 42 | 49 4c 49 54 59 2c 20 4f |. * LIAB|ILITY, O|
|00000760| 52 20 54 4f 52 54 20 28 | 49 4e 43 4c 55 44 49 4e |R TORT (|INCLUDIN|
|00000770| 47 20 4e 45 47 4c 49 47 | 45 4e 43 45 20 4f 52 20 |G NEGLIG|ENCE OR |
|00000780| 4f 54 48 45 52 57 49 53 | 45 29 20 41 52 49 53 49 |OTHERWIS|E) ARISI|
|00000790| 4e 47 20 49 4e 20 41 4e | 59 20 57 41 59 0d 20 2a |NG IN AN|Y WAY. *|
|000007a0| 20 4f 55 54 20 4f 46 20 | 54 48 45 20 55 53 45 20 | OUT OF |THE USE |
|000007b0| 4f 46 20 54 48 49 53 20 | 53 4f 46 54 57 41 52 45 |OF THIS |SOFTWARE|
|000007c0| 2c 20 45 56 45 4e 20 49 | 46 20 41 44 56 49 53 45 |, EVEN I|F ADVISE|
|000007d0| 44 20 4f 46 20 54 48 45 | 20 50 4f 53 53 49 42 49 |D OF THE| POSSIBI|
|000007e0| 4c 49 54 59 20 4f 46 0d | 20 2a 20 53 55 43 48 20 |LITY OF.| * SUCH |
|000007f0| 44 41 4d 41 47 45 2e 0d | 20 2a 2f 0d 0d 23 69 66 |DAMAGE..| */..#if|
|00000800| 6e 64 65 66 20 6c 69 6e | 74 0d 73 74 61 74 69 63 |ndef lin|t.static|
|00000810| 20 63 68 61 72 20 73 63 | 63 73 69 64 5b 5d 20 3d | char sc|csid[] =|
|00000820| 20 22 40 28 23 29 6c 72 | 30 2e 63 09 35 2e 33 20 | "@(#)lr|0.c.5.3 |
|00000830| 28 42 65 72 6b 65 6c 65 | 79 29 20 31 2f 32 30 2f |(Berkele|y) 1/20/|
|00000840| 39 31 22 3b 0d 23 65 6e | 64 69 66 20 2f 2a 20 6e |91";.#en|dif /* n|
|00000850| 6f 74 20 6c 69 6e 74 20 | 2a 2f 0d 0d 23 69 6e 63 |ot lint |*/..#inc|
|00000860| 6c 75 64 65 20 22 64 65 | 66 73 2e 68 22 0d 0d 65 |lude "de|fs.h"..e|
|00000870| 78 74 65 72 6e 20 73 68 | 6f 72 74 20 2a 69 74 65 |xtern sh|ort *ite|
|00000880| 6d 73 65 74 3b 0d 65 78 | 74 65 72 6e 20 73 68 6f |mset;.ex|tern sho|
|00000890| 72 74 20 2a 69 74 65 6d | 73 65 74 65 6e 64 3b 0d |rt *item|setend;.|
|000008a0| 65 78 74 65 72 6e 20 75 | 6e 73 69 67 6e 65 64 20 |extern u|nsigned |
|000008b0| 2a 72 75 6c 65 73 65 74 | 3b 0d 0d 69 6e 74 20 6e |*ruleset|;..int n|
|000008c0| 73 74 61 74 65 73 3b 0d | 63 6f 72 65 20 2a 66 69 |states;.|core *fi|
|000008d0| 72 73 74 5f 73 74 61 74 | 65 3b 0d 73 68 69 66 74 |rst_stat|e;.shift|
|000008e0| 73 20 2a 66 69 72 73 74 | 5f 73 68 69 66 74 3b 0d |s *first|_shift;.|
|000008f0| 72 65 64 75 63 74 69 6f | 6e 73 20 2a 66 69 72 73 |reductio|ns *firs|
|00000900| 74 5f 72 65 64 75 63 74 | 69 6f 6e 3b 0d 0d 69 6e |t_reduct|ion;..in|
|00000910| 74 20 67 65 74 5f 73 74 | 61 74 65 28 29 3b 0d 63 |t get_st|ate();.c|
|00000920| 6f 72 65 20 2a 6e 65 77 | 5f 73 74 61 74 65 28 29 |ore *new|_state()|
|00000930| 3b 0d 0d 73 74 61 74 69 | 63 20 63 6f 72 65 20 2a |;..stati|c core *|
|00000940| 2a 73 74 61 74 65 5f 73 | 65 74 3b 0d 73 74 61 74 |*state_s|et;.stat|
|00000950| 69 63 20 63 6f 72 65 20 | 2a 74 68 69 73 5f 73 74 |ic core |*this_st|
|00000960| 61 74 65 3b 0d 73 74 61 | 74 69 63 20 63 6f 72 65 |ate;.sta|tic core|
|00000970| 20 2a 6c 61 73 74 5f 73 | 74 61 74 65 3b 0d 73 74 | *last_s|tate;.st|
|00000980| 61 74 69 63 20 73 68 69 | 66 74 73 20 2a 6c 61 73 |atic shi|fts *las|
|00000990| 74 5f 73 68 69 66 74 3b | 0d 73 74 61 74 69 63 20 |t_shift;|.static |
|000009a0| 72 65 64 75 63 74 69 6f | 6e 73 20 2a 6c 61 73 74 |reductio|ns *last|
|000009b0| 5f 72 65 64 75 63 74 69 | 6f 6e 3b 0d 0d 73 74 61 |_reducti|on;..sta|
|000009c0| 74 69 63 20 69 6e 74 20 | 6e 73 68 69 66 74 73 3b |tic int |nshifts;|
|000009d0| 0d 73 74 61 74 69 63 20 | 73 68 6f 72 74 20 2a 73 |.static |short *s|
|000009e0| 68 69 66 74 5f 73 79 6d | 62 6f 6c 3b 0d 0d 73 74 |hift_sym|bol;..st|
|000009f0| 61 74 69 63 20 73 68 6f | 72 74 20 2a 72 65 64 73 |atic sho|rt *reds|
|00000a00| 65 74 3b 0d 73 74 61 74 | 69 63 20 73 68 6f 72 74 |et;.stat|ic short|
|00000a10| 20 2a 73 68 69 66 74 73 | 65 74 3b 0d 0d 73 74 61 | *shifts|et;..sta|
|00000a20| 74 69 63 20 73 68 6f 72 | 74 20 2a 2a 6b 65 72 6e |tic shor|t **kern|
|00000a30| 65 6c 5f 62 61 73 65 3b | 0d 73 74 61 74 69 63 20 |el_base;|.static |
|00000a40| 73 68 6f 72 74 20 2a 2a | 6b 65 72 6e 65 6c 5f 65 |short **|kernel_e|
|00000a50| 6e 64 3b 0d 73 74 61 74 | 69 63 20 73 68 6f 72 74 |nd;.stat|ic short|
|00000a60| 20 2a 6b 65 72 6e 65 6c | 5f 69 74 65 6d 73 3b 0d | *kernel|_items;.|
|00000a70| 0d 0d 61 6c 6c 6f 63 61 | 74 65 5f 69 74 65 6d 73 |..alloca|te_items|
|00000a80| 65 74 73 28 29 0d 7b 0d | 20 20 20 20 72 65 67 69 |ets().{.| regi|
|00000a90| 73 74 65 72 20 73 68 6f | 72 74 20 2a 69 74 65 6d |ster sho|rt *item|
|00000aa0| 70 3b 0d 20 20 20 20 72 | 65 67 69 73 74 65 72 20 |p;. r|egister |
|00000ab0| 73 68 6f 72 74 20 2a 69 | 74 65 6d 5f 65 6e 64 3b |short *i|tem_end;|
|00000ac0| 0d 20 20 20 20 72 65 67 | 69 73 74 65 72 20 69 6e |. reg|ister in|
|00000ad0| 74 20 73 79 6d 62 6f 6c | 3b 0d 20 20 20 20 72 65 |t symbol|;. re|
|00000ae0| 67 69 73 74 65 72 20 69 | 6e 74 20 69 3b 0d 20 20 |gister i|nt i;. |
|00000af0| 20 20 72 65 67 69 73 74 | 65 72 20 69 6e 74 20 63 | regist|er int c|
|00000b00| 6f 75 6e 74 3b 0d 20 20 | 20 20 72 65 67 69 73 74 |ount;. | regist|
|00000b10| 65 72 20 69 6e 74 20 6d | 61 78 3b 0d 20 20 20 20 |er int m|ax;. |
|00000b20| 72 65 67 69 73 74 65 72 | 20 73 68 6f 72 74 20 2a |register| short *|
|00000b30| 73 79 6d 62 6f 6c 5f 63 | 6f 75 6e 74 3b 0d 0d 20 |symbol_c|ount;.. |
|00000b40| 20 20 20 63 6f 75 6e 74 | 20 3d 20 30 3b 0d 20 20 | count| = 0;. |
|00000b50| 20 20 73 79 6d 62 6f 6c | 5f 63 6f 75 6e 74 20 3d | symbol|_count =|
|00000b60| 20 4e 45 57 32 28 6e 73 | 79 6d 73 2c 20 73 68 6f | NEW2(ns|yms, sho|
|00000b70| 72 74 29 3b 0d 0d 20 20 | 20 20 69 74 65 6d 5f 65 |rt);.. | item_e|
|00000b80| 6e 64 20 3d 20 72 69 74 | 65 6d 20 2b 20 6e 69 74 |nd = rit|em + nit|
|00000b90| 65 6d 73 3b 0d 20 20 20 | 20 66 6f 72 20 28 69 74 |ems;. | for (it|
|00000ba0| 65 6d 70 20 3d 20 72 69 | 74 65 6d 3b 20 69 74 65 |emp = ri|tem; ite|
|00000bb0| 6d 70 20 3c 20 69 74 65 | 6d 5f 65 6e 64 3b 20 69 |mp < ite|m_end; i|
|00000bc0| 74 65 6d 70 2b 2b 29 0d | 20 20 20 20 7b 0d 09 73 |temp++).| {..s|
|00000bd0| 79 6d 62 6f 6c 20 3d 20 | 2a 69 74 65 6d 70 3b 0d |ymbol = |*itemp;.|
|00000be0| 09 69 66 20 28 73 79 6d | 62 6f 6c 20 3e 3d 20 30 |.if (sym|bol >= 0|
|00000bf0| 29 0d 09 7b 0d 09 20 20 | 20 20 63 6f 75 6e 74 2b |)..{.. | count+|
|00000c00| 2b 3b 0d 09 20 20 20 20 | 73 79 6d 62 6f 6c 5f 63 |+;.. |symbol_c|
|00000c10| 6f 75 6e 74 5b 73 79 6d | 62 6f 6c 5d 2b 2b 3b 0d |ount[sym|bol]++;.|
|00000c20| 09 7d 0d 20 20 20 20 7d | 0d 0d 20 20 20 20 6b 65 |.}. }|.. ke|
|00000c30| 72 6e 65 6c 5f 62 61 73 | 65 20 3d 20 4e 45 57 32 |rnel_bas|e = NEW2|
|00000c40| 28 6e 73 79 6d 73 2c 20 | 73 68 6f 72 74 20 2a 29 |(nsyms, |short *)|
|00000c50| 3b 0d 20 20 20 20 6b 65 | 72 6e 65 6c 5f 69 74 65 |;. ke|rnel_ite|
|00000c60| 6d 73 20 3d 20 4e 45 57 | 32 28 63 6f 75 6e 74 2c |ms = NEW|2(count,|
|00000c70| 20 73 68 6f 72 74 29 3b | 0d 0d 20 20 20 20 63 6f | short);|.. co|
|00000c80| 75 6e 74 20 3d 20 30 3b | 0d 20 20 20 20 6d 61 78 |unt = 0;|. max|
|00000c90| 20 3d 20 30 3b 0d 20 20 | 20 20 66 6f 72 20 28 69 | = 0;. | for (i|
|00000ca0| 20 3d 20 30 3b 20 69 20 | 3c 20 6e 73 79 6d 73 3b | = 0; i |< nsyms;|
|00000cb0| 20 69 2b 2b 29 0d 20 20 | 20 20 7b 0d 09 6b 65 72 | i++). | {..ker|
|00000cc0| 6e 65 6c 5f 62 61 73 65 | 5b 69 5d 20 3d 20 6b 65 |nel_base|[i] = ke|
|00000cd0| 72 6e 65 6c 5f 69 74 65 | 6d 73 20 2b 20 63 6f 75 |rnel_ite|ms + cou|
|00000ce0| 6e 74 3b 0d 09 63 6f 75 | 6e 74 20 2b 3d 20 73 79 |nt;..cou|nt += sy|
|00000cf0| 6d 62 6f 6c 5f 63 6f 75 | 6e 74 5b 69 5d 3b 0d 09 |mbol_cou|nt[i];..|
|00000d00| 69 66 20 28 6d 61 78 20 | 3c 20 73 79 6d 62 6f 6c |if (max |< symbol|
|00000d10| 5f 63 6f 75 6e 74 5b 69 | 5d 29 0d 09 20 20 20 20 |_count[i|]).. |
|00000d20| 6d 61 78 20 3d 20 73 79 | 6d 62 6f 6c 5f 63 6f 75 |max = sy|mbol_cou|
|00000d30| 6e 74 5b 69 5d 3b 0d 20 | 20 20 20 7d 0d 0d 20 20 |nt[i];. | }.. |
|00000d40| 20 20 73 68 69 66 74 5f | 73 79 6d 62 6f 6c 20 3d | shift_|symbol =|
|00000d50| 20 73 79 6d 62 6f 6c 5f | 63 6f 75 6e 74 3b 0d 20 | symbol_|count;. |
|00000d60| 20 20 20 6b 65 72 6e 65 | 6c 5f 65 6e 64 20 3d 20 | kerne|l_end = |
|00000d70| 4e 45 57 32 28 6e 73 79 | 6d 73 2c 20 73 68 6f 72 |NEW2(nsy|ms, shor|
|00000d80| 74 20 2a 29 3b 0d 7d 0d | 0d 0d 61 6c 6c 6f 63 61 |t *);.}.|..alloca|
|00000d90| 74 65 5f 73 74 6f 72 61 | 67 65 28 29 0d 7b 0d 20 |te_stora|ge().{. |
|00000da0| 20 20 20 61 6c 6c 6f 63 | 61 74 65 5f 69 74 65 6d | alloc|ate_item|
|00000db0| 73 65 74 73 28 29 3b 0d | 20 20 20 20 73 68 69 66 |sets();.| shif|
|00000dc0| 74 73 65 74 20 3d 20 4e | 45 57 32 28 6e 73 79 6d |tset = N|EW2(nsym|
|00000dd0| 73 2c 20 73 68 6f 72 74 | 29 3b 0d 20 20 20 20 72 |s, short|);. r|
|00000de0| 65 64 73 65 74 20 3d 20 | 4e 45 57 32 28 6e 72 75 |edset = |NEW2(nru|
|00000df0| 6c 65 73 20 2b 20 31 2c | 20 73 68 6f 72 74 29 3b |les + 1,| short);|
|00000e00| 0d 20 20 20 20 73 74 61 | 74 65 5f 73 65 74 20 3d |. sta|te_set =|
|00000e10| 20 4e 45 57 32 28 6e 69 | 74 65 6d 73 2c 20 63 6f | NEW2(ni|tems, co|
|00000e20| 72 65 20 2a 29 3b 0d 7d | 0d 0d 0d 61 70 70 65 6e |re *);.}|...appen|
|00000e30| 64 5f 73 74 61 74 65 73 | 28 29 0d 7b 0d 20 20 20 |d_states|().{. |
|00000e40| 20 72 65 67 69 73 74 65 | 72 20 69 6e 74 20 69 3b | registe|r int i;|
|00000e50| 0d 20 20 20 20 72 65 67 | 69 73 74 65 72 20 69 6e |. reg|ister in|
|00000e60| 74 20 6a 3b 0d 20 20 20 | 20 72 65 67 69 73 74 65 |t j;. | registe|
|00000e70| 72 20 69 6e 74 20 73 79 | 6d 62 6f 6c 3b 0d 0d 23 |r int sy|mbol;..#|
|00000e80| 69 66 64 65 66 09 54 52 | 41 43 45 0d 20 20 20 20 |ifdef.TR|ACE. |
|00000e90| 66 70 72 69 6e 74 66 28 | 73 74 64 65 72 72 2c 20 |fprintf(|stderr, |
|00000ea0| 22 45 6e 74 65 72 69 6e | 67 20 61 70 70 65 6e 64 |"Enterin|g append|
|00000eb0| 5f 73 74 61 74 65 73 28 | 29 5c 6e 22 29 3b 0d 23 |_states(|)\n");.#|
|00000ec0| 65 6e 64 69 66 0d 20 20 | 20 20 66 6f 72 20 28 69 |endif. | for (i|
|00000ed0| 20 3d 20 31 3b 20 69 20 | 3c 20 6e 73 68 69 66 74 | = 1; i |< nshift|
|00000ee0| 73 3b 20 69 2b 2b 29 0d | 20 20 20 20 7b 0d 09 73 |s; i++).| {..s|
|00000ef0| 79 6d 62 6f 6c 20 3d 20 | 73 68 69 66 74 5f 73 79 |ymbol = |shift_sy|
|00000f00| 6d 62 6f 6c 5b 69 5d 3b | 0d 09 6a 20 3d 20 69 3b |mbol[i];|..j = i;|
|00000f10| 0d 09 77 68 69 6c 65 20 | 28 6a 20 3e 20 30 20 26 |..while |(j > 0 &|
|00000f20| 26 20 73 68 69 66 74 5f | 73 79 6d 62 6f 6c 5b 6a |& shift_|symbol[j|
|00000f30| 20 2d 20 31 5d 20 3e 20 | 73 79 6d 62 6f 6c 29 0d | - 1] > |symbol).|
|00000f40| 09 7b 0d 09 20 20 20 20 | 73 68 69 66 74 5f 73 79 |.{.. |shift_sy|
|00000f50| 6d 62 6f 6c 5b 6a 5d 20 | 3d 20 73 68 69 66 74 5f |mbol[j] |= shift_|
|00000f60| 73 79 6d 62 6f 6c 5b 6a | 20 2d 20 31 5d 3b 0d 09 |symbol[j| - 1];..|
|00000f70| 20 20 20 20 6a 2d 2d 3b | 0d 09 7d 0d 09 73 68 69 | j--;|..}..shi|
|00000f80| 66 74 5f 73 79 6d 62 6f | 6c 5b 6a 5d 20 3d 20 73 |ft_symbo|l[j] = s|
|00000f90| 79 6d 62 6f 6c 3b 0d 20 | 20 20 20 7d 0d 0d 20 20 |ymbol;. | }.. |
|00000fa0| 20 20 66 6f 72 20 28 69 | 20 3d 20 30 3b 20 69 20 | for (i| = 0; i |
|00000fb0| 3c 20 6e 73 68 69 66 74 | 73 3b 20 69 2b 2b 29 0d |< nshift|s; i++).|
|00000fc0| 20 20 20 20 7b 0d 09 73 | 79 6d 62 6f 6c 20 3d 20 | {..s|ymbol = |
|00000fd0| 73 68 69 66 74 5f 73 79 | 6d 62 6f 6c 5b 69 5d 3b |shift_sy|mbol[i];|
|00000fe0| 0d 09 73 68 69 66 74 73 | 65 74 5b 69 5d 20 3d 20 |..shifts|et[i] = |
|00000ff0| 67 65 74 5f 73 74 61 74 | 65 28 73 79 6d 62 6f 6c |get_stat|e(symbol|
|00001000| 29 3b 0d 20 20 20 20 7d | 0d 7d 0d 0d 0d 66 72 65 |);. }|.}...fre|
|00001010| 65 5f 73 74 6f 72 61 67 | 65 28 29 0d 7b 0d 20 20 |e_storag|e().{. |
|00001020| 20 20 46 52 45 45 28 73 | 68 69 66 74 5f 73 79 6d | FREE(s|hift_sym|
|00001030| 62 6f 6c 29 3b 0d 20 20 | 20 20 46 52 45 45 28 72 |bol);. | FREE(r|
|00001040| 65 64 73 65 74 29 3b 0d | 20 20 20 20 46 52 45 45 |edset);.| FREE|
|00001050| 28 73 68 69 66 74 73 65 | 74 29 3b 0d 20 20 20 20 |(shiftse|t);. |
|00001060| 46 52 45 45 28 6b 65 72 | 6e 65 6c 5f 62 61 73 65 |FREE(ker|nel_base|
|00001070| 29 3b 0d 20 20 20 20 46 | 52 45 45 28 6b 65 72 6e |);. F|REE(kern|
|00001080| 65 6c 5f 65 6e 64 29 3b | 0d 20 20 20 20 46 52 45 |el_end);|. FRE|
|00001090| 45 28 6b 65 72 6e 65 6c | 5f 69 74 65 6d 73 29 3b |E(kernel|_items);|
|000010a0| 0d 20 20 20 20 46 52 45 | 45 28 73 74 61 74 65 5f |. FRE|E(state_|
|000010b0| 73 65 74 29 3b 0d 7d 0d | 0d 0d 0d 67 65 6e 65 72 |set);.}.|...gener|
|000010c0| 61 74 65 5f 73 74 61 74 | 65 73 28 29 0d 7b 0d 20 |ate_stat|es().{. |
|000010d0| 20 20 20 61 6c 6c 6f 63 | 61 74 65 5f 73 74 6f 72 | alloc|ate_stor|
|000010e0| 61 67 65 28 29 3b 0d 20 | 20 20 20 69 74 65 6d 73 |age();. | items|
|000010f0| 65 74 20 3d 20 4e 45 57 | 32 28 6e 69 74 65 6d 73 |et = NEW|2(nitems|
|00001100| 2c 20 73 68 6f 72 74 29 | 3b 0d 20 20 20 20 72 75 |, short)|;. ru|
|00001110| 6c 65 73 65 74 20 3d 20 | 4e 45 57 32 28 57 4f 52 |leset = |NEW2(WOR|
|00001120| 44 53 49 5a 45 28 6e 72 | 75 6c 65 73 29 2c 20 75 |DSIZE(nr|ules), u|
|00001130| 6e 73 69 67 6e 65 64 29 | 3b 0d 20 20 20 20 73 65 |nsigned)|;. se|
|00001140| 74 5f 66 69 72 73 74 5f | 64 65 72 69 76 65 73 28 |t_first_|derives(|
|00001150| 29 3b 0d 20 20 20 20 69 | 6e 69 74 69 61 6c 69 7a |);. i|nitializ|
|00001160| 65 5f 73 74 61 74 65 73 | 28 29 3b 0d 0d 20 20 20 |e_states|();.. |
|00001170| 20 77 68 69 6c 65 20 28 | 74 68 69 73 5f 73 74 61 | while (|this_sta|
|00001180| 74 65 29 0d 20 20 20 20 | 7b 0d 09 63 6c 6f 73 75 |te). |{..closu|
|00001190| 72 65 28 74 68 69 73 5f | 73 74 61 74 65 2d 3e 69 |re(this_|state->i|
|000011a0| 74 65 6d 73 2c 20 74 68 | 69 73 5f 73 74 61 74 65 |tems, th|is_state|
|000011b0| 2d 3e 6e 69 74 65 6d 73 | 29 3b 0d 09 73 61 76 65 |->nitems|);..save|
|000011c0| 5f 72 65 64 75 63 74 69 | 6f 6e 73 28 29 3b 0d 09 |_reducti|ons();..|
|000011d0| 6e 65 77 5f 69 74 65 6d | 73 65 74 73 28 29 3b 0d |new_item|sets();.|
|000011e0| 09 61 70 70 65 6e 64 5f | 73 74 61 74 65 73 28 29 |.append_|states()|
|000011f0| 3b 0d 0d 09 69 66 20 28 | 6e 73 68 69 66 74 73 20 |;...if (|nshifts |
|00001200| 3e 20 30 29 0d 09 20 20 | 20 20 73 61 76 65 5f 73 |> 0).. | save_s|
|00001210| 68 69 66 74 73 28 29 3b | 0d 0d 09 74 68 69 73 5f |hifts();|...this_|
|00001220| 73 74 61 74 65 20 3d 20 | 74 68 69 73 5f 73 74 61 |state = |this_sta|
|00001230| 74 65 2d 3e 6e 65 78 74 | 3b 0d 20 20 20 20 7d 0d |te->next|;. }.|
|00001240| 0d 20 20 20 20 66 69 6e | 61 6c 69 7a 65 5f 63 6c |. fin|alize_cl|
|00001250| 6f 73 75 72 65 28 29 3b | 0d 20 20 20 20 66 72 65 |osure();|. fre|
|00001260| 65 5f 73 74 6f 72 61 67 | 65 28 29 3b 0d 7d 0d 0d |e_storag|e();.}..|
|00001270| 0d 0d 69 6e 74 0d 67 65 | 74 5f 73 74 61 74 65 28 |..int.ge|t_state(|
|00001280| 73 79 6d 62 6f 6c 29 0d | 69 6e 74 20 73 79 6d 62 |symbol).|int symb|
|00001290| 6f 6c 3b 0d 7b 0d 20 20 | 20 20 72 65 67 69 73 74 |ol;.{. | regist|
|000012a0| 65 72 20 69 6e 74 20 6b | 65 79 3b 0d 20 20 20 20 |er int k|ey;. |
|000012b0| 72 65 67 69 73 74 65 72 | 20 73 68 6f 72 74 20 2a |register| short *|
|000012c0| 69 73 70 31 3b 0d 20 20 | 20 20 72 65 67 69 73 74 |isp1;. | regist|
|000012d0| 65 72 20 73 68 6f 72 74 | 20 2a 69 73 70 32 3b 0d |er short| *isp2;.|
|000012e0| 20 20 20 20 72 65 67 69 | 73 74 65 72 20 73 68 6f | regi|ster sho|
|000012f0| 72 74 20 2a 69 65 6e 64 | 3b 0d 20 20 20 20 72 65 |rt *iend|;. re|
|00001300| 67 69 73 74 65 72 20 63 | 6f 72 65 20 2a 73 70 3b |gister c|ore *sp;|
|00001310| 0d 20 20 20 20 72 65 67 | 69 73 74 65 72 20 69 6e |. reg|ister in|
|00001320| 74 20 66 6f 75 6e 64 3b | 0d 20 20 20 20 72 65 67 |t found;|. reg|
|00001330| 69 73 74 65 72 20 69 6e | 74 20 6e 3b 0d 0d 23 69 |ister in|t n;..#i|
|00001340| 66 64 65 66 09 54 52 41 | 43 45 0d 20 20 20 20 66 |fdef.TRA|CE. f|
|00001350| 70 72 69 6e 74 66 28 73 | 74 64 65 72 72 2c 20 22 |printf(s|tderr, "|
|00001360| 45 6e 74 65 72 69 6e 67 | 20 67 65 74 5f 73 74 61 |Entering| get_sta|
|00001370| 74 65 28 25 64 29 5c 6e | 22 2c 20 73 79 6d 62 6f |te(%d)\n|", symbo|
|00001380| 6c 29 3b 0d 23 65 6e 64 | 69 66 0d 0d 20 20 20 20 |l);.#end|if.. |
|00001390| 69 73 70 31 20 3d 20 6b | 65 72 6e 65 6c 5f 62 61 |isp1 = k|ernel_ba|
|000013a0| 73 65 5b 73 79 6d 62 6f | 6c 5d 3b 0d 20 20 20 20 |se[symbo|l];. |
|000013b0| 69 65 6e 64 20 3d 20 6b | 65 72 6e 65 6c 5f 65 6e |iend = k|ernel_en|
|000013c0| 64 5b 73 79 6d 62 6f 6c | 5d 3b 0d 20 20 20 20 6e |d[symbol|];. n|
|000013d0| 20 3d 20 69 65 6e 64 20 | 2d 20 69 73 70 31 3b 0d | = iend |- isp1;.|
|000013e0| 0d 20 20 20 20 6b 65 79 | 20 3d 20 2a 69 73 70 31 |. key| = *isp1|
|000013f0| 3b 0d 20 20 20 20 61 73 | 73 65 72 74 28 30 20 3c |;. as|sert(0 <|
|00001400| 3d 20 6b 65 79 20 26 26 | 20 6b 65 79 20 3c 20 6e |= key &&| key < n|
|00001410| 69 74 65 6d 73 29 3b 0d | 20 20 20 20 73 70 20 3d |items);.| sp =|
|00001420| 20 73 74 61 74 65 5f 73 | 65 74 5b 6b 65 79 5d 3b | state_s|et[key];|
|00001430| 0d 20 20 20 20 69 66 20 | 28 73 70 29 0d 20 20 20 |. if |(sp). |
|00001440| 20 7b 0d 09 66 6f 75 6e | 64 20 3d 20 30 3b 0d 09 | {..foun|d = 0;..|
|00001450| 77 68 69 6c 65 20 28 21 | 66 6f 75 6e 64 29 0d 09 |while (!|found)..|
|00001460| 7b 0d 09 20 20 20 20 69 | 66 20 28 73 70 2d 3e 6e |{.. i|f (sp->n|
|00001470| 69 74 65 6d 73 20 3d 3d | 20 6e 29 0d 09 20 20 20 |items ==| n).. |
|00001480| 20 7b 0d 09 09 66 6f 75 | 6e 64 20 3d 20 31 3b 0d | {...fou|nd = 1;.|
|00001490| 09 09 69 73 70 31 20 3d | 20 6b 65 72 6e 65 6c 5f |..isp1 =| kernel_|
|000014a0| 62 61 73 65 5b 73 79 6d | 62 6f 6c 5d 3b 0d 09 09 |base[sym|bol];...|
|000014b0| 69 73 70 32 20 3d 20 73 | 70 2d 3e 69 74 65 6d 73 |isp2 = s|p->items|
|000014c0| 3b 0d 0d 09 09 77 68 69 | 6c 65 20 28 66 6f 75 6e |;....whi|le (foun|
|000014d0| 64 20 26 26 20 69 73 70 | 31 20 3c 20 69 65 6e 64 |d && isp|1 < iend|
|000014e0| 29 0d 09 09 7b 0d 09 09 | 20 20 20 20 69 66 20 28 |)...{...| if (|
|000014f0| 2a 69 73 70 31 2b 2b 20 | 21 3d 20 2a 69 73 70 32 |*isp1++ |!= *isp2|
|00001500| 2b 2b 29 0d 09 09 09 66 | 6f 75 6e 64 20 3d 20 30 |++)....f|ound = 0|
|00001510| 3b 0d 09 09 7d 0d 09 20 | 20 20 20 7d 0d 0d 09 20 |;...}.. | }... |
|00001520| 20 20 20 69 66 20 28 21 | 66 6f 75 6e 64 29 0d 09 | if (!|found)..|
|00001530| 20 20 20 20 7b 0d 09 09 | 69 66 20 28 73 70 2d 3e | {...|if (sp->|
|00001540| 6c 69 6e 6b 29 0d 09 09 | 7b 0d 09 09 20 20 20 20 |link)...|{... |
|00001550| 73 70 20 3d 20 73 70 2d | 3e 6c 69 6e 6b 3b 0d 09 |sp = sp-|>link;..|
|00001560| 09 7d 0d 09 09 65 6c 73 | 65 0d 09 09 7b 0d 09 09 |.}...els|e...{...|
|00001570| 20 20 20 20 73 70 20 3d | 20 73 70 2d 3e 6c 69 6e | sp =| sp->lin|
|00001580| 6b 20 3d 20 6e 65 77 5f | 73 74 61 74 65 28 73 79 |k = new_|state(sy|
|00001590| 6d 62 6f 6c 29 3b 0d 09 | 09 20 20 20 20 66 6f 75 |mbol);..|. fou|
|000015a0| 6e 64 20 3d 20 31 3b 0d | 09 09 7d 0d 09 20 20 20 |nd = 1;.|..}.. |
|000015b0| 20 7d 0d 09 7d 0d 20 20 | 20 20 7d 0d 20 20 20 20 | }..}. | }. |
|000015c0| 65 6c 73 65 0d 20 20 20 | 20 7b 0d 09 73 74 61 74 |else. | {..stat|
|000015d0| 65 5f 73 65 74 5b 6b 65 | 79 5d 20 3d 20 73 70 20 |e_set[ke|y] = sp |
|000015e0| 3d 20 6e 65 77 5f 73 74 | 61 74 65 28 73 79 6d 62 |= new_st|ate(symb|
|000015f0| 6f 6c 29 3b 0d 20 20 20 | 20 7d 0d 0d 20 20 20 20 |ol);. | }.. |
|00001600| 72 65 74 75 72 6e 20 28 | 73 70 2d 3e 6e 75 6d 62 |return (|sp->numb|
|00001610| 65 72 29 3b 0d 7d 0d 0d | 0d 0d 69 6e 69 74 69 61 |er);.}..|..initia|
|00001620| 6c 69 7a 65 5f 73 74 61 | 74 65 73 28 29 0d 7b 0d |lize_sta|tes().{.|
|00001630| 20 20 20 20 72 65 67 69 | 73 74 65 72 20 69 6e 74 | regi|ster int|
|00001640| 20 69 3b 0d 20 20 20 20 | 72 65 67 69 73 74 65 72 | i;. |register|
|00001650| 20 73 68 6f 72 74 20 2a | 73 74 61 72 74 5f 64 65 | short *|start_de|
|00001660| 72 69 76 65 73 3b 0d 20 | 20 20 20 72 65 67 69 73 |rives;. | regis|
|00001670| 74 65 72 20 63 6f 72 65 | 20 2a 70 3b 0d 0d 20 20 |ter core| *p;.. |
|00001680| 20 20 73 74 61 72 74 5f | 64 65 72 69 76 65 73 20 | start_|derives |
|00001690| 3d 20 64 65 72 69 76 65 | 73 5b 73 74 61 72 74 5f |= derive|s[start_|
|000016a0| 73 79 6d 62 6f 6c 5d 3b | 0d 20 20 20 20 66 6f 72 |symbol];|. for|
|000016b0| 20 28 69 20 3d 20 30 3b | 20 73 74 61 72 74 5f 64 | (i = 0;| start_d|
|000016c0| 65 72 69 76 65 73 5b 69 | 5d 20 3e 3d 20 30 3b 20 |erives[i|] >= 0; |
|000016d0| 2b 2b 69 29 0d 09 63 6f | 6e 74 69 6e 75 65 3b 0d |++i)..co|ntinue;.|
|000016e0| 0d 20 20 20 20 70 20 3d | 20 28 63 6f 72 65 20 2a |. p =| (core *|
|000016f0| 29 20 4d 41 4c 4c 4f 43 | 28 73 69 7a 65 6f 66 28 |) MALLOC|(sizeof(|
|00001700| 63 6f 72 65 29 20 2b 20 | 69 2a 73 69 7a 65 6f 66 |core) + |i*sizeof|
|00001710| 28 73 68 6f 72 74 29 29 | 3b 0d 20 20 20 20 69 66 |(short))|;. if|
|00001720| 20 28 70 20 3d 3d 20 30 | 29 20 6e 6f 5f 73 70 61 | (p == 0|) no_spa|
|00001730| 63 65 28 29 3b 0d 0d 20 | 20 20 20 70 2d 3e 6e 65 |ce();.. | p->ne|
|00001740| 78 74 20 3d 20 30 3b 0d | 20 20 20 20 70 2d 3e 6c |xt = 0;.| p->l|
|00001750| 69 6e 6b 20 3d 20 30 3b | 0d 20 20 20 20 70 2d 3e |ink = 0;|. p->|
|00001760| 6e 75 6d 62 65 72 20 3d | 20 30 3b 0d 20 20 20 20 |number =| 0;. |
|00001770| 70 2d 3e 61 63 63 65 73 | 73 69 6e 67 5f 73 79 6d |p->acces|sing_sym|
|00001780| 62 6f 6c 20 3d 20 30 3b | 0d 20 20 20 20 70 2d 3e |bol = 0;|. p->|
|00001790| 6e 69 74 65 6d 73 20 3d | 20 69 3b 0d 0d 20 20 20 |nitems =| i;.. |
|000017a0| 20 66 6f 72 20 28 69 20 | 3d 20 30 3b 20 20 73 74 | for (i |= 0; st|
|000017b0| 61 72 74 5f 64 65 72 69 | 76 65 73 5b 69 5d 20 3e |art_deri|ves[i] >|
|000017c0| 3d 20 30 3b 20 2b 2b 69 | 29 0d 09 70 2d 3e 69 74 |= 0; ++i|)..p->it|
|000017d0| 65 6d 73 5b 69 5d 20 3d | 20 72 72 68 73 5b 73 74 |ems[i] =| rrhs[st|
|000017e0| 61 72 74 5f 64 65 72 69 | 76 65 73 5b 69 5d 5d 3b |art_deri|ves[i]];|
|000017f0| 0d 0d 20 20 20 20 66 69 | 72 73 74 5f 73 74 61 74 |.. fi|rst_stat|
|00001800| 65 20 3d 20 6c 61 73 74 | 5f 73 74 61 74 65 20 3d |e = last|_state =|
|00001810| 20 74 68 69 73 5f 73 74 | 61 74 65 20 3d 20 70 3b | this_st|ate = p;|
|00001820| 0d 20 20 20 20 6e 73 74 | 61 74 65 73 20 3d 20 31 |. nst|ates = 1|
|00001830| 3b 0d 7d 0d 0d 0d 6e 65 | 77 5f 69 74 65 6d 73 65 |;.}...ne|w_itemse|
|00001840| 74 73 28 29 0d 7b 0d 20 | 20 20 20 72 65 67 69 73 |ts().{. | regis|
|00001850| 74 65 72 20 69 6e 74 20 | 69 3b 0d 20 20 20 20 72 |ter int |i;. r|
|00001860| 65 67 69 73 74 65 72 20 | 69 6e 74 20 73 68 69 66 |egister |int shif|
|00001870| 74 63 6f 75 6e 74 3b 0d | 20 20 20 20 72 65 67 69 |tcount;.| regi|
|00001880| 73 74 65 72 20 73 68 6f | 72 74 20 2a 69 73 70 3b |ster sho|rt *isp;|
|00001890| 0d 20 20 20 20 72 65 67 | 69 73 74 65 72 20 73 68 |. reg|ister sh|
|000018a0| 6f 72 74 20 2a 6b 73 70 | 3b 0d 20 20 20 20 72 65 |ort *ksp|;. re|
|000018b0| 67 69 73 74 65 72 20 69 | 6e 74 20 73 79 6d 62 6f |gister i|nt symbo|
|000018c0| 6c 3b 0d 0d 20 20 20 20 | 66 6f 72 20 28 69 20 3d |l;.. |for (i =|
|000018d0| 20 30 3b 20 69 20 3c 20 | 6e 73 79 6d 73 3b 20 69 | 0; i < |nsyms; i|
|000018e0| 2b 2b 29 0d 09 6b 65 72 | 6e 65 6c 5f 65 6e 64 5b |++)..ker|nel_end[|
|000018f0| 69 5d 20 3d 20 30 3b 0d | 0d 20 20 20 20 73 68 69 |i] = 0;.|. shi|
|00001900| 66 74 63 6f 75 6e 74 20 | 3d 20 30 3b 0d 20 20 20 |ftcount |= 0;. |
|00001910| 20 69 73 70 20 3d 20 69 | 74 65 6d 73 65 74 3b 0d | isp = i|temset;.|
|00001920| 20 20 20 20 77 68 69 6c | 65 20 28 69 73 70 20 3c | whil|e (isp <|
|00001930| 20 69 74 65 6d 73 65 74 | 65 6e 64 29 0d 20 20 20 | itemset|end). |
|00001940| 20 7b 0d 09 69 20 3d 20 | 2a 69 73 70 2b 2b 3b 0d | {..i = |*isp++;.|
|00001950| 09 73 79 6d 62 6f 6c 20 | 3d 20 72 69 74 65 6d 5b |.symbol |= ritem[|
|00001960| 69 5d 3b 0d 09 69 66 20 | 28 73 79 6d 62 6f 6c 20 |i];..if |(symbol |
|00001970| 3e 20 30 29 0d 09 7b 0d | 09 20 20 20 20 6b 73 70 |> 0)..{.|. ksp|
|00001980| 20 3d 20 6b 65 72 6e 65 | 6c 5f 65 6e 64 5b 73 79 | = kerne|l_end[sy|
|00001990| 6d 62 6f 6c 5d 3b 0d 09 | 20 20 20 20 69 66 20 28 |mbol];..| if (|
|000019a0| 21 6b 73 70 29 0d 09 20 | 20 20 20 7b 0d 09 09 73 |!ksp).. | {...s|
|000019b0| 68 69 66 74 5f 73 79 6d | 62 6f 6c 5b 73 68 69 66 |hift_sym|bol[shif|
|000019c0| 74 63 6f 75 6e 74 2b 2b | 5d 20 3d 20 73 79 6d 62 |tcount++|] = symb|
|000019d0| 6f 6c 3b 0d 09 09 6b 73 | 70 20 3d 20 6b 65 72 6e |ol;...ks|p = kern|
|000019e0| 65 6c 5f 62 61 73 65 5b | 73 79 6d 62 6f 6c 5d 3b |el_base[|symbol];|
|000019f0| 0d 09 20 20 20 20 7d 0d | 0d 09 20 20 20 20 2a 6b |.. }.|.. *k|
|00001a00| 73 70 2b 2b 20 3d 20 69 | 20 2b 20 31 3b 0d 09 20 |sp++ = i| + 1;.. |
|00001a10| 20 20 20 6b 65 72 6e 65 | 6c 5f 65 6e 64 5b 73 79 | kerne|l_end[sy|
|00001a20| 6d 62 6f 6c 5d 20 3d 20 | 6b 73 70 3b 0d 09 7d 0d |mbol] = |ksp;..}.|
|00001a30| 20 20 20 20 7d 0d 0d 20 | 20 20 20 6e 73 68 69 66 | }.. | nshif|
|00001a40| 74 73 20 3d 20 73 68 69 | 66 74 63 6f 75 6e 74 3b |ts = shi|ftcount;|
|00001a50| 0d 7d 0d 0d 0d 0d 63 6f | 72 65 20 2a 0d 6e 65 77 |.}....co|re *.new|
|00001a60| 5f 73 74 61 74 65 28 73 | 79 6d 62 6f 6c 29 0d 69 |_state(s|ymbol).i|
|00001a70| 6e 74 20 73 79 6d 62 6f | 6c 3b 0d 7b 0d 20 20 20 |nt symbo|l;.{. |
|00001a80| 20 72 65 67 69 73 74 65 | 72 20 69 6e 74 20 6e 3b | registe|r int n;|
|00001a90| 0d 20 20 20 20 72 65 67 | 69 73 74 65 72 20 63 6f |. reg|ister co|
|00001aa0| 72 65 20 2a 70 3b 0d 20 | 20 20 20 72 65 67 69 73 |re *p;. | regis|
|00001ab0| 74 65 72 20 73 68 6f 72 | 74 20 2a 69 73 70 31 3b |ter shor|t *isp1;|
|00001ac0| 0d 20 20 20 20 72 65 67 | 69 73 74 65 72 20 73 68 |. reg|ister sh|
|00001ad0| 6f 72 74 20 2a 69 73 70 | 32 3b 0d 20 20 20 20 72 |ort *isp|2;. r|
|00001ae0| 65 67 69 73 74 65 72 20 | 73 68 6f 72 74 20 2a 69 |egister |short *i|
|00001af0| 65 6e 64 3b 0d 0d 23 69 | 66 64 65 66 09 54 52 41 |end;..#i|fdef.TRA|
|00001b00| 43 45 0d 20 20 20 20 66 | 70 72 69 6e 74 66 28 73 |CE. f|printf(s|
|00001b10| 74 64 65 72 72 2c 20 22 | 45 6e 74 65 72 69 6e 67 |tderr, "|Entering|
|00001b20| 20 6e 65 77 5f 73 74 61 | 74 65 28 25 64 29 5c 6e | new_sta|te(%d)\n|
|00001b30| 22 2c 20 73 79 6d 62 6f | 6c 29 3b 0d 23 65 6e 64 |", symbo|l);.#end|
|00001b40| 69 66 0d 0d 20 20 20 20 | 69 66 20 28 6e 73 74 61 |if.. |if (nsta|
|00001b50| 74 65 73 20 3e 3d 20 4d | 41 58 53 48 4f 52 54 29 |tes >= M|AXSHORT)|
|00001b60| 0d 09 66 61 74 61 6c 28 | 22 74 6f 6f 20 6d 61 6e |..fatal(|"too man|
|00001b70| 79 20 73 74 61 74 65 73 | 22 29 3b 0d 0d 20 20 20 |y states|");.. |
|00001b80| 20 69 73 70 31 20 3d 20 | 6b 65 72 6e 65 6c 5f 62 | isp1 = |kernel_b|
|00001b90| 61 73 65 5b 73 79 6d 62 | 6f 6c 5d 3b 0d 20 20 20 |ase[symb|ol];. |
|00001ba0| 20 69 65 6e 64 20 3d 20 | 6b 65 72 6e 65 6c 5f 65 | iend = |kernel_e|
|00001bb0| 6e 64 5b 73 79 6d 62 6f | 6c 5d 3b 0d 20 20 20 20 |nd[symbo|l];. |
|00001bc0| 6e 20 3d 20 69 65 6e 64 | 20 2d 20 69 73 70 31 3b |n = iend| - isp1;|
|00001bd0| 0d 0d 20 20 20 20 70 20 | 3d 20 28 63 6f 72 65 20 |.. p |= (core |
|00001be0| 2a 29 20 61 6c 6c 6f 63 | 61 74 65 28 28 75 6e 73 |*) alloc|ate((uns|
|00001bf0| 69 67 6e 65 64 29 20 28 | 73 69 7a 65 6f 66 28 63 |igned) (|sizeof(c|
|00001c00| 6f 72 65 29 20 2b 20 28 | 6e 20 2d 20 31 29 20 2a |ore) + (|n - 1) *|
|00001c10| 20 73 69 7a 65 6f 66 28 | 73 68 6f 72 74 29 29 29 | sizeof(|short)))|
|00001c20| 3b 0d 20 20 20 20 70 2d | 3e 61 63 63 65 73 73 69 |;. p-|>accessi|
|00001c30| 6e 67 5f 73 79 6d 62 6f | 6c 20 3d 20 73 79 6d 62 |ng_symbo|l = symb|
|00001c40| 6f 6c 3b 0d 20 20 20 20 | 70 2d 3e 6e 75 6d 62 65 |ol;. |p->numbe|
|00001c50| 72 20 3d 20 6e 73 74 61 | 74 65 73 3b 0d 20 20 20 |r = nsta|tes;. |
|00001c60| 20 70 2d 3e 6e 69 74 65 | 6d 73 20 3d 20 6e 3b 0d | p->nite|ms = n;.|
|00001c70| 0d 20 20 20 20 69 73 70 | 32 20 3d 20 70 2d 3e 69 |. isp|2 = p->i|
|00001c80| 74 65 6d 73 3b 0d 20 20 | 20 20 77 68 69 6c 65 20 |tems;. | while |
|00001c90| 28 69 73 70 31 20 3c 20 | 69 65 6e 64 29 0d 09 2a |(isp1 < |iend)..*|
|00001ca0| 69 73 70 32 2b 2b 20 3d | 20 2a 69 73 70 31 2b 2b |isp2++ =| *isp1++|
|00001cb0| 3b 0d 0d 20 20 20 20 6c | 61 73 74 5f 73 74 61 74 |;.. l|ast_stat|
|00001cc0| 65 2d 3e 6e 65 78 74 20 | 3d 20 70 3b 0d 20 20 20 |e->next |= p;. |
|00001cd0| 20 6c 61 73 74 5f 73 74 | 61 74 65 20 3d 20 70 3b | last_st|ate = p;|
|00001ce0| 0d 0d 20 20 20 20 6e 73 | 74 61 74 65 73 2b 2b 3b |.. ns|tates++;|
|00001cf0| 0d 0d 20 20 20 20 72 65 | 74 75 72 6e 20 28 70 29 |.. re|turn (p)|
|00001d00| 3b 0d 7d 0d 0d 0d 2f 2a | 20 73 68 6f 77 5f 63 6f |;.}.../*| show_co|
|00001d10| 72 65 73 20 69 73 20 75 | 73 65 64 20 66 6f 72 20 |res is u|sed for |
|00001d20| 64 65 62 75 67 67 69 6e | 67 20 2a 2f 0d 0d 73 68 |debuggin|g */..sh|
|00001d30| 6f 77 5f 63 6f 72 65 73 | 28 29 0d 7b 0d 20 20 20 |ow_cores|().{. |
|00001d40| 20 63 6f 72 65 20 2a 70 | 3b 0d 20 20 20 20 69 6e | core *p|;. in|
|00001d50| 74 20 69 2c 20 6a 2c 20 | 6b 2c 20 6e 3b 0d 20 20 |t i, j, |k, n;. |
|00001d60| 20 20 69 6e 74 20 69 74 | 65 6d 6e 6f 3b 0d 0d 20 | int it|emno;.. |
|00001d70| 20 20 20 6b 20 3d 20 30 | 3b 0d 20 20 20 20 66 6f | k = 0|;. fo|
|00001d80| 72 20 28 70 20 3d 20 66 | 69 72 73 74 5f 73 74 61 |r (p = f|irst_sta|
|00001d90| 74 65 3b 20 70 3b 20 2b | 2b 6b 2c 20 70 20 3d 20 |te; p; +|+k, p = |
|00001da0| 70 2d 3e 6e 65 78 74 29 | 0d 20 20 20 20 7b 0d 09 |p->next)|. {..|
|00001db0| 69 66 20 28 6b 29 20 70 | 72 69 6e 74 66 28 22 5c |if (k) p|rintf("\|
|00001dc0| 6e 22 29 3b 0d 09 70 72 | 69 6e 74 66 28 22 73 74 |n");..pr|intf("st|
|00001dd0| 61 74 65 20 25 64 2c 20 | 6e 75 6d 62 65 72 20 3d |ate %d, |number =|
|00001de0| 20 25 64 2c 20 61 63 63 | 65 73 73 69 6e 67 20 73 | %d, acc|essing s|
|00001df0| 79 6d 62 6f 6c 20 3d 20 | 25 73 5c 6e 22 2c 0d 09 |ymbol = |%s\n",..|
|00001e00| 09 6b 2c 20 70 2d 3e 6e | 75 6d 62 65 72 2c 20 73 |.k, p->n|umber, s|
|00001e10| 79 6d 62 6f 6c 5f 6e 61 | 6d 65 5b 70 2d 3e 61 63 |ymbol_na|me[p->ac|
|00001e20| 63 65 73 73 69 6e 67 5f | 73 79 6d 62 6f 6c 5d 29 |cessing_|symbol])|
|00001e30| 3b 0d 09 6e 20 3d 20 70 | 2d 3e 6e 69 74 65 6d 73 |;..n = p|->nitems|
|00001e40| 3b 0d 09 66 6f 72 20 28 | 69 20 3d 20 30 3b 20 69 |;..for (|i = 0; i|
|00001e50| 20 3c 20 6e 3b 20 2b 2b | 69 29 0d 09 7b 0d 09 20 | < n; ++|i)..{.. |
|00001e60| 20 20 20 69 74 65 6d 6e | 6f 20 3d 20 70 2d 3e 69 | itemn|o = p->i|
|00001e70| 74 65 6d 73 5b 69 5d 3b | 0d 09 20 20 20 20 70 72 |tems[i];|.. pr|
|00001e80| 69 6e 74 66 28 22 25 34 | 64 20 20 22 2c 20 69 74 |intf("%4|d ", it|
|00001e90| 65 6d 6e 6f 29 3b 0d 09 | 20 20 20 20 6a 20 3d 20 |emno);..| j = |
|00001ea0| 69 74 65 6d 6e 6f 3b 0d | 09 20 20 20 20 77 68 69 |itemno;.|. whi|
|00001eb0| 6c 65 20 28 72 69 74 65 | 6d 5b 6a 5d 20 3e 3d 20 |le (rite|m[j] >= |
|00001ec0| 30 29 20 2b 2b 6a 3b 0d | 09 20 20 20 20 70 72 69 |0) ++j;.|. pri|
|00001ed0| 6e 74 66 28 22 25 73 20 | 3a 22 2c 20 73 79 6d 62 |ntf("%s |:", symb|
|00001ee0| 6f 6c 5f 6e 61 6d 65 5b | 72 6c 68 73 5b 2d 72 69 |ol_name[|rlhs[-ri|
|00001ef0| 74 65 6d 5b 6a 5d 5d 5d | 29 3b 0d 09 20 20 20 20 |tem[j]]]|);.. |
|00001f00| 6a 20 3d 20 72 72 68 73 | 5b 2d 72 69 74 65 6d 5b |j = rrhs|[-ritem[|
|00001f10| 6a 5d 5d 3b 0d 09 20 20 | 20 20 77 68 69 6c 65 20 |j]];.. | while |
|00001f20| 28 6a 20 3c 20 69 74 65 | 6d 6e 6f 29 0d 09 09 70 |(j < ite|mno)...p|
|00001f30| 72 69 6e 74 66 28 22 20 | 25 73 22 2c 20 73 79 6d |rintf(" |%s", sym|
|00001f40| 62 6f 6c 5f 6e 61 6d 65 | 5b 72 69 74 65 6d 5b 6a |bol_name|[ritem[j|
|00001f50| 2b 2b 5d 5d 29 3b 0d 09 | 20 20 20 20 70 72 69 6e |++]]);..| prin|
|00001f60| 74 66 28 22 20 2e 22 29 | 3b 0d 09 20 20 20 20 77 |tf(" .")|;.. w|
|00001f70| 68 69 6c 65 20 28 72 69 | 74 65 6d 5b 6a 5d 20 3e |hile (ri|tem[j] >|
|00001f80| 3d 20 30 29 0d 09 09 70 | 72 69 6e 74 66 28 22 20 |= 0)...p|rintf(" |
|00001f90| 25 73 22 2c 20 73 79 6d | 62 6f 6c 5f 6e 61 6d 65 |%s", sym|bol_name|
|00001fa0| 5b 72 69 74 65 6d 5b 6a | 2b 2b 5d 5d 29 3b 0d 09 |[ritem[j|++]]);..|
|00001fb0| 20 20 20 20 70 72 69 6e | 74 66 28 22 5c 6e 22 29 | prin|tf("\n")|
|00001fc0| 3b 0d 09 20 20 20 20 66 | 66 6c 75 73 68 28 73 74 |;.. f|flush(st|
|00001fd0| 64 6f 75 74 29 3b 0d 09 | 7d 0d 20 20 20 20 7d 0d |dout);..|}. }.|
|00001fe0| 7d 0d 0d 0d 2f 2a 20 73 | 68 6f 77 5f 72 69 74 65 |}.../* s|how_rite|
|00001ff0| 6d 73 20 69 73 20 75 73 | 65 64 20 66 6f 72 20 64 |ms is us|ed for d|
|00002000| 65 62 75 67 67 69 6e 67 | 20 2a 2f 0d 0d 73 68 6f |ebugging| */..sho|
|00002010| 77 5f 72 69 74 65 6d 73 | 28 29 0d 7b 0d 20 20 20 |w_ritems|().{. |
|00002020| 20 69 6e 74 20 69 3b 0d | 0d 20 20 20 20 66 6f 72 | int i;.|. for|
|00002030| 20 28 69 20 3d 20 30 3b | 20 69 20 3c 20 6e 69 74 | (i = 0;| i < nit|
|00002040| 65 6d 73 3b 20 2b 2b 69 | 29 0d 09 70 72 69 6e 74 |ems; ++i|)..print|
|00002050| 66 28 22 72 69 74 65 6d | 5b 25 64 5d 20 3d 20 25 |f("ritem|[%d] = %|
|00002060| 64 5c 6e 22 2c 20 69 2c | 20 72 69 74 65 6d 5b 69 |d\n", i,| ritem[i|
|00002070| 5d 29 3b 0d 7d 0d 0d 0d | 2f 2a 20 73 68 6f 77 5f |]);.}...|/* show_|
|00002080| 72 72 68 73 20 69 73 20 | 75 73 65 64 20 66 6f 72 |rrhs is |used for|
|00002090| 20 64 65 62 75 67 67 69 | 6e 67 20 2a 2f 0d 73 68 | debuggi|ng */.sh|
|000020a0| 6f 77 5f 72 72 68 73 28 | 29 0d 7b 0d 20 20 20 20 |ow_rrhs(|).{. |
|000020b0| 69 6e 74 20 69 3b 0d 0d | 20 20 20 20 66 6f 72 20 |int i;..| for |
|000020c0| 28 69 20 3d 20 30 3b 20 | 69 20 3c 20 6e 72 75 6c |(i = 0; |i < nrul|
|000020d0| 65 73 3b 20 2b 2b 69 29 | 0d 09 70 72 69 6e 74 66 |es; ++i)|..printf|
|000020e0| 28 22 72 72 68 73 5b 25 | 64 5d 20 3d 20 25 64 5c |("rrhs[%|d] = %d\|
|000020f0| 6e 22 2c 20 69 2c 20 72 | 72 68 73 5b 69 5d 29 3b |n", i, r|rhs[i]);|
|00002100| 0d 7d 0d 0d 0d 2f 2a 20 | 73 68 6f 77 5f 73 68 69 |.}.../* |show_shi|
|00002110| 66 74 73 20 69 73 20 75 | 73 65 64 20 66 6f 72 20 |fts is u|sed for |
|00002120| 64 65 62 75 67 67 69 6e | 67 20 2a 2f 0d 0d 73 68 |debuggin|g */..sh|
|00002130| 6f 77 5f 73 68 69 66 74 | 73 28 29 0d 7b 0d 20 20 |ow_shift|s().{. |
|00002140| 20 20 73 68 69 66 74 73 | 20 2a 70 3b 0d 20 20 20 | shifts| *p;. |
|00002150| 20 69 6e 74 20 69 2c 20 | 6a 2c 20 6b 3b 0d 0d 20 | int i, |j, k;.. |
|00002160| 20 20 20 6b 20 3d 20 30 | 3b 0d 20 20 20 20 66 6f | k = 0|;. fo|
|00002170| 72 20 28 70 20 3d 20 66 | 69 72 73 74 5f 73 68 69 |r (p = f|irst_shi|
|00002180| 66 74 3b 20 70 3b 20 2b | 2b 6b 2c 20 70 20 3d 20 |ft; p; +|+k, p = |
|00002190| 70 2d 3e 6e 65 78 74 29 | 0d 20 20 20 20 7b 0d 09 |p->next)|. {..|
|000021a0| 69 66 20 28 6b 29 20 70 | 72 69 6e 74 66 28 22 5c |if (k) p|rintf("\|
|000021b0| 6e 22 29 3b 0d 09 70 72 | 69 6e 74 66 28 22 73 68 |n");..pr|intf("sh|
|000021c0| 69 66 74 20 25 64 2c 20 | 6e 75 6d 62 65 72 20 3d |ift %d, |number =|
|000021d0| 20 25 64 2c 20 6e 73 68 | 69 66 74 73 20 3d 20 25 | %d, nsh|ifts = %|
|000021e0| 64 5c 6e 22 2c 20 6b 2c | 20 70 2d 3e 6e 75 6d 62 |d\n", k,| p->numb|
|000021f0| 65 72 2c 0d 09 09 70 2d | 3e 6e 73 68 69 66 74 73 |er,...p-|>nshifts|
|00002200| 29 3b 0d 09 6a 20 3d 20 | 70 2d 3e 6e 73 68 69 66 |);..j = |p->nshif|
|00002210| 74 73 3b 0d 09 66 6f 72 | 20 28 69 20 3d 20 30 3b |ts;..for| (i = 0;|
|00002220| 20 69 20 3c 20 6a 3b 20 | 2b 2b 69 29 0d 09 20 20 | i < j; |++i).. |
|00002230| 20 20 70 72 69 6e 74 66 | 28 22 5c 74 25 64 5c 6e | printf|("\t%d\n|
|00002240| 22 2c 20 70 2d 3e 73 68 | 69 66 74 5b 69 5d 29 3b |", p->sh|ift[i]);|
|00002250| 0d 20 20 20 20 7d 0d 7d | 0d 0d 0d 73 61 76 65 5f |. }.}|...save_|
|00002260| 73 68 69 66 74 73 28 29 | 0d 7b 0d 20 20 20 20 72 |shifts()|.{. r|
|00002270| 65 67 69 73 74 65 72 20 | 73 68 69 66 74 73 20 2a |egister |shifts *|
|00002280| 70 3b 0d 20 20 20 20 72 | 65 67 69 73 74 65 72 20 |p;. r|egister |
|00002290| 73 68 6f 72 74 20 2a 73 | 70 31 3b 0d 20 20 20 20 |short *s|p1;. |
|000022a0| 72 65 67 69 73 74 65 72 | 20 73 68 6f 72 74 20 2a |register| short *|
|000022b0| 73 70 32 3b 0d 20 20 20 | 20 72 65 67 69 73 74 65 |sp2;. | registe|
|000022c0| 72 20 73 68 6f 72 74 20 | 2a 73 65 6e 64 3b 0d 0d |r short |*send;..|
|000022d0| 20 20 20 20 70 20 3d 20 | 28 73 68 69 66 74 73 20 | p = |(shifts |
|000022e0| 2a 29 20 61 6c 6c 6f 63 | 61 74 65 28 28 75 6e 73 |*) alloc|ate((uns|
|000022f0| 69 67 6e 65 64 29 20 28 | 73 69 7a 65 6f 66 28 73 |igned) (|sizeof(s|
|00002300| 68 69 66 74 73 29 20 2b | 0d 09 09 09 28 6e 73 68 |hifts) +|....(nsh|
|00002310| 69 66 74 73 20 2d 20 31 | 29 20 2a 20 73 69 7a 65 |ifts - 1|) * size|
|00002320| 6f 66 28 73 68 6f 72 74 | 29 29 29 3b 0d 0d 20 20 |of(short|)));.. |
|00002330| 20 20 70 2d 3e 6e 75 6d | 62 65 72 20 3d 20 74 68 | p->num|ber = th|
|00002340| 69 73 5f 73 74 61 74 65 | 2d 3e 6e 75 6d 62 65 72 |is_state|->number|
|00002350| 3b 0d 20 20 20 20 70 2d | 3e 6e 73 68 69 66 74 73 |;. p-|>nshifts|
|00002360| 20 3d 20 6e 73 68 69 66 | 74 73 3b 0d 0d 20 20 20 | = nshif|ts;.. |
|00002370| 20 73 70 31 20 3d 20 73 | 68 69 66 74 73 65 74 3b | sp1 = s|hiftset;|
|00002380| 0d 20 20 20 20 73 70 32 | 20 3d 20 70 2d 3e 73 68 |. sp2| = p->sh|
|00002390| 69 66 74 3b 0d 20 20 20 | 20 73 65 6e 64 20 3d 20 |ift;. | send = |
|000023a0| 73 68 69 66 74 73 65 74 | 20 2b 20 6e 73 68 69 66 |shiftset| + nshif|
|000023b0| 74 73 3b 0d 0d 20 20 20 | 20 77 68 69 6c 65 20 28 |ts;.. | while (|
|000023c0| 73 70 31 20 3c 20 73 65 | 6e 64 29 0d 09 2a 73 70 |sp1 < se|nd)..*sp|
|000023d0| 32 2b 2b 20 3d 20 2a 73 | 70 31 2b 2b 3b 0d 0d 20 |2++ = *s|p1++;.. |
|000023e0| 20 20 20 69 66 20 28 6c | 61 73 74 5f 73 68 69 66 | if (l|ast_shif|
|000023f0| 74 29 0d 20 20 20 20 7b | 0d 09 6c 61 73 74 5f 73 |t). {|..last_s|
|00002400| 68 69 66 74 2d 3e 6e 65 | 78 74 20 3d 20 70 3b 0d |hift->ne|xt = p;.|
|00002410| 09 6c 61 73 74 5f 73 68 | 69 66 74 20 3d 20 70 3b |.last_sh|ift = p;|
|00002420| 0d 20 20 20 20 7d 0d 20 | 20 20 20 65 6c 73 65 0d |. }. | else.|
|00002430| 20 20 20 20 7b 0d 09 66 | 69 72 73 74 5f 73 68 69 | {..f|irst_shi|
|00002440| 66 74 20 3d 20 70 3b 0d | 09 6c 61 73 74 5f 73 68 |ft = p;.|.last_sh|
|00002450| 69 66 74 20 3d 20 70 3b | 0d 20 20 20 20 7d 0d 7d |ift = p;|. }.}|
|00002460| 0d 0d 0d 0d 73 61 76 65 | 5f 72 65 64 75 63 74 69 |....save|_reducti|
|00002470| 6f 6e 73 28 29 0d 7b 0d | 20 20 20 20 72 65 67 69 |ons().{.| regi|
|00002480| 73 74 65 72 20 73 68 6f | 72 74 20 2a 69 73 70 3b |ster sho|rt *isp;|
|00002490| 0d 20 20 20 20 72 65 67 | 69 73 74 65 72 20 73 68 |. reg|ister sh|
|000024a0| 6f 72 74 20 2a 72 70 31 | 3b 0d 20 20 20 20 72 65 |ort *rp1|;. re|
|000024b0| 67 69 73 74 65 72 20 73 | 68 6f 72 74 20 2a 72 70 |gister s|hort *rp|
|000024c0| 32 3b 0d 20 20 20 20 72 | 65 67 69 73 74 65 72 20 |2;. r|egister |
|000024d0| 69 6e 74 20 69 74 65 6d | 3b 0d 20 20 20 20 72 65 |int item|;. re|
|000024e0| 67 69 73 74 65 72 20 69 | 6e 74 20 63 6f 75 6e 74 |gister i|nt count|
|000024f0| 3b 0d 20 20 20 20 72 65 | 67 69 73 74 65 72 20 72 |;. re|gister r|
|00002500| 65 64 75 63 74 69 6f 6e | 73 20 2a 70 3b 0d 20 20 |eduction|s *p;. |
|00002510| 20 20 72 65 67 69 73 74 | 65 72 20 73 68 6f 72 74 | regist|er short|
|00002520| 20 2a 72 65 6e 64 3b 0d | 0d 20 20 20 20 63 6f 75 | *rend;.|. cou|
|00002530| 6e 74 20 3d 20 30 3b 0d | 20 20 20 20 66 6f 72 20 |nt = 0;.| for |
|00002540| 28 69 73 70 20 3d 20 69 | 74 65 6d 73 65 74 3b 20 |(isp = i|temset; |
|00002550| 69 73 70 20 3c 20 69 74 | 65 6d 73 65 74 65 6e 64 |isp < it|emsetend|
|00002560| 3b 20 69 73 70 2b 2b 29 | 0d 20 20 20 20 7b 0d 09 |; isp++)|. {..|
|00002570| 69 74 65 6d 20 3d 20 72 | 69 74 65 6d 5b 2a 69 73 |item = r|item[*is|
|00002580| 70 5d 3b 0d 09 69 66 20 | 28 69 74 65 6d 20 3c 20 |p];..if |(item < |
|00002590| 30 29 0d 09 7b 0d 09 20 | 20 20 20 72 65 64 73 65 |0)..{.. | redse|
|000025a0| 74 5b 63 6f 75 6e 74 2b | 2b 5d 20 3d 20 2d 69 74 |t[count+|+] = -it|
|000025b0| 65 6d 3b 0d 09 7d 0d 20 | 20 20 20 7d 0d 0d 20 20 |em;..}. | }.. |
|000025c0| 20 20 69 66 20 28 63 6f | 75 6e 74 29 0d 20 20 20 | if (co|unt). |
|000025d0| 20 7b 0d 09 70 20 3d 20 | 28 72 65 64 75 63 74 69 | {..p = |(reducti|
|000025e0| 6f 6e 73 20 2a 29 20 61 | 6c 6c 6f 63 61 74 65 28 |ons *) a|llocate(|
|000025f0| 28 75 6e 73 69 67 6e 65 | 64 29 20 28 73 69 7a 65 |(unsigne|d) (size|
|00002600| 6f 66 28 72 65 64 75 63 | 74 69 6f 6e 73 29 20 2b |of(reduc|tions) +|
|00002610| 0d 09 09 09 09 09 28 63 | 6f 75 6e 74 20 2d 20 31 |......(c|ount - 1|
|00002620| 29 20 2a 20 73 69 7a 65 | 6f 66 28 73 68 6f 72 74 |) * size|of(short|
|00002630| 29 29 29 3b 0d 0d 09 70 | 2d 3e 6e 75 6d 62 65 72 |)));...p|->number|
|00002640| 20 3d 20 74 68 69 73 5f | 73 74 61 74 65 2d 3e 6e | = this_|state->n|
|00002650| 75 6d 62 65 72 3b 0d 09 | 70 2d 3e 6e 72 65 64 73 |umber;..|p->nreds|
|00002660| 20 3d 20 63 6f 75 6e 74 | 3b 0d 0d 09 72 70 31 20 | = count|;...rp1 |
|00002670| 3d 20 72 65 64 73 65 74 | 3b 0d 09 72 70 32 20 3d |= redset|;..rp2 =|
|00002680| 20 70 2d 3e 72 75 6c 65 | 73 3b 0d 09 72 65 6e 64 | p->rule|s;..rend|
|00002690| 20 3d 20 72 70 31 20 2b | 20 63 6f 75 6e 74 3b 0d | = rp1 +| count;.|
|000026a0| 0d 09 77 68 69 6c 65 20 | 28 72 70 31 20 3c 20 72 |..while |(rp1 < r|
|000026b0| 65 6e 64 29 0d 09 20 20 | 20 20 2a 72 70 32 2b 2b |end).. | *rp2++|
|000026c0| 20 3d 20 2a 72 70 31 2b | 2b 3b 0d 0d 09 69 66 20 | = *rp1+|+;...if |
|000026d0| 28 6c 61 73 74 5f 72 65 | 64 75 63 74 69 6f 6e 29 |(last_re|duction)|
|000026e0| 0d 09 7b 0d 09 20 20 20 | 20 6c 61 73 74 5f 72 65 |..{.. | last_re|
|000026f0| 64 75 63 74 69 6f 6e 2d | 3e 6e 65 78 74 20 3d 20 |duction-|>next = |
|00002700| 70 3b 0d 09 20 20 20 20 | 6c 61 73 74 5f 72 65 64 |p;.. |last_red|
|00002710| 75 63 74 69 6f 6e 20 3d | 20 70 3b 0d 09 7d 0d 09 |uction =| p;..}..|
|00002720| 65 6c 73 65 0d 09 7b 0d | 09 20 20 20 20 66 69 72 |else..{.|. fir|
|00002730| 73 74 5f 72 65 64 75 63 | 74 69 6f 6e 20 3d 20 70 |st_reduc|tion = p|
|00002740| 3b 0d 09 20 20 20 20 6c | 61 73 74 5f 72 65 64 75 |;.. l|ast_redu|
|00002750| 63 74 69 6f 6e 20 3d 20 | 70 3b 0d 09 7d 0d 20 20 |ction = |p;..}. |
|00002760| 20 20 7d 0d 7d 0d 0d 0d | 73 65 74 5f 64 65 72 69 | }.}...|set_deri|
|00002770| 76 65 73 28 29 0d 7b 0d | 20 20 20 20 72 65 67 69 |ves().{.| regi|
|00002780| 73 74 65 72 20 69 6e 74 | 20 69 2c 20 6b 3b 0d 20 |ster int| i, k;. |
|00002790| 20 20 20 72 65 67 69 73 | 74 65 72 20 69 6e 74 20 | regis|ter int |
|000027a0| 6c 68 73 3b 0d 20 20 20 | 20 72 65 67 69 73 74 65 |lhs;. | registe|
|000027b0| 72 20 73 68 6f 72 74 20 | 2a 72 75 6c 65 73 3b 0d |r short |*rules;.|
|000027c0| 0d 20 20 20 20 64 65 72 | 69 76 65 73 20 3d 20 4e |. der|ives = N|
|000027d0| 45 57 32 28 6e 73 79 6d | 73 2c 20 73 68 6f 72 74 |EW2(nsym|s, short|
|000027e0| 20 2a 29 3b 0d 20 20 20 | 20 72 75 6c 65 73 20 3d | *);. | rules =|
|000027f0| 20 4e 45 57 32 28 6e 76 | 61 72 73 20 2b 20 6e 72 | NEW2(nv|ars + nr|
|00002800| 75 6c 65 73 2c 20 73 68 | 6f 72 74 29 3b 0d 0d 20 |ules, sh|ort);.. |
|00002810| 20 20 20 6b 20 3d 20 30 | 3b 0d 20 20 20 20 66 6f | k = 0|;. fo|
|00002820| 72 20 28 6c 68 73 20 3d | 20 73 74 61 72 74 5f 73 |r (lhs =| start_s|
|00002830| 79 6d 62 6f 6c 3b 20 6c | 68 73 20 3c 20 6e 73 79 |ymbol; l|hs < nsy|
|00002840| 6d 73 3b 20 6c 68 73 2b | 2b 29 0d 20 20 20 20 7b |ms; lhs+|+). {|
|00002850| 0d 09 64 65 72 69 76 65 | 73 5b 6c 68 73 5d 20 3d |..derive|s[lhs] =|
|00002860| 20 72 75 6c 65 73 20 2b | 20 6b 3b 0d 09 66 6f 72 | rules +| k;..for|
|00002870| 20 28 69 20 3d 20 30 3b | 20 69 20 3c 20 6e 72 75 | (i = 0;| i < nru|
|00002880| 6c 65 73 3b 20 69 2b 2b | 29 0d 09 7b 0d 09 20 20 |les; i++|)..{.. |
|00002890| 20 20 69 66 20 28 72 6c | 68 73 5b 69 5d 20 3d 3d | if (rl|hs[i] ==|
|000028a0| 20 6c 68 73 29 0d 09 20 | 20 20 20 7b 0d 09 09 72 | lhs).. | {...r|
|000028b0| 75 6c 65 73 5b 6b 5d 20 | 3d 20 69 3b 0d 09 09 6b |ules[k] |= i;...k|
|000028c0| 2b 2b 3b 0d 09 20 20 20 | 20 7d 0d 09 7d 0d 09 72 |++;.. | }..}..r|
|000028d0| 75 6c 65 73 5b 6b 5d 20 | 3d 20 2d 31 3b 0d 09 6b |ules[k] |= -1;..k|
|000028e0| 2b 2b 3b 0d 20 20 20 20 | 7d 0d 0d 23 69 66 64 65 |++;. |}..#ifde|
|000028f0| 66 09 44 45 42 55 47 0d | 20 20 20 20 70 72 69 6e |f.DEBUG.| prin|
|00002900| 74 5f 64 65 72 69 76 65 | 73 28 29 3b 0d 23 65 6e |t_derive|s();.#en|
|00002910| 64 69 66 0d 7d 0d 0d 66 | 72 65 65 5f 64 65 72 69 |dif.}..f|ree_deri|
|00002920| 76 65 73 28 29 0d 7b 0d | 20 20 20 20 46 52 45 45 |ves().{.| FREE|
|00002930| 28 64 65 72 69 76 65 73 | 5b 73 74 61 72 74 5f 73 |(derives|[start_s|
|00002940| 79 6d 62 6f 6c 5d 29 3b | 0d 20 20 20 20 46 52 45 |ymbol]);|. FRE|
|00002950| 45 28 64 65 72 69 76 65 | 73 29 3b 0d 7d 0d 0d 23 |E(derive|s);.}..#|
|00002960| 69 66 64 65 66 09 44 45 | 42 55 47 0d 70 72 69 6e |ifdef.DE|BUG.prin|
|00002970| 74 5f 64 65 72 69 76 65 | 73 28 29 0d 7b 0d 20 20 |t_derive|s().{. |
|00002980| 20 20 72 65 67 69 73 74 | 65 72 20 69 6e 74 20 69 | regist|er int i|
|00002990| 3b 0d 20 20 20 20 72 65 | 67 69 73 74 65 72 20 73 |;. re|gister s|
|000029a0| 68 6f 72 74 20 2a 73 70 | 3b 0d 0d 20 20 20 20 70 |hort *sp|;.. p|
|000029b0| 72 69 6e 74 66 28 22 5c | 6e 44 45 52 49 56 45 53 |rintf("\|nDERIVES|
|000029c0| 5c 6e 5c 6e 22 29 3b 0d | 0d 20 20 20 20 66 6f 72 |\n\n");.|. for|
|000029d0| 20 28 69 20 3d 20 73 74 | 61 72 74 5f 73 79 6d 62 | (i = st|art_symb|
|000029e0| 6f 6c 3b 20 69 20 3c 20 | 6e 73 79 6d 73 3b 20 69 |ol; i < |nsyms; i|
|000029f0| 2b 2b 29 0d 20 20 20 20 | 7b 0d 09 70 72 69 6e 74 |++). |{..print|
|00002a00| 66 28 22 25 73 20 64 65 | 72 69 76 65 73 20 22 2c |f("%s de|rives ",|
|00002a10| 20 73 79 6d 62 6f 6c 5f | 6e 61 6d 65 5b 69 5d 29 | symbol_|name[i])|
|00002a20| 3b 0d 09 66 6f 72 20 28 | 73 70 20 3d 20 64 65 72 |;..for (|sp = der|
|00002a30| 69 76 65 73 5b 69 5d 3b | 20 2a 73 70 20 3e 3d 20 |ives[i];| *sp >= |
|00002a40| 30 3b 20 73 70 2b 2b 29 | 0d 09 7b 0d 09 20 20 20 |0; sp++)|..{.. |
|00002a50| 20 70 72 69 6e 74 66 28 | 22 20 20 25 64 22 2c 20 | printf(|" %d", |
|00002a60| 2a 73 70 29 3b 0d 09 7d | 0d 09 70 75 74 63 68 61 |*sp);..}|..putcha|
|00002a70| 72 28 27 5c 6e 27 29 3b | 0d 20 20 20 20 7d 0d 0d |r('\n');|. }..|
|00002a80| 20 20 20 20 70 75 74 63 | 68 61 72 28 27 5c 6e 27 | putc|har('\n'|
|00002a90| 29 3b 0d 7d 0d 23 65 6e | 64 69 66 0d 0d 0d 73 65 |);.}.#en|dif...se|
|00002aa0| 74 5f 6e 75 6c 6c 61 62 | 6c 65 28 29 0d 7b 0d 20 |t_nullab|le().{. |
|00002ab0| 20 20 20 72 65 67 69 73 | 74 65 72 20 69 6e 74 20 | regis|ter int |
|00002ac0| 69 2c 20 6a 3b 0d 20 20 | 20 20 72 65 67 69 73 74 |i, j;. | regist|
|00002ad0| 65 72 20 69 6e 74 20 65 | 6d 70 74 79 3b 0d 20 20 |er int e|mpty;. |
|00002ae0| 20 20 69 6e 74 20 64 6f | 6e 65 3b 0d 0d 20 20 20 | int do|ne;.. |
|00002af0| 20 6e 75 6c 6c 61 62 6c | 65 20 3d 20 4d 41 4c 4c | nullabl|e = MALL|
|00002b00| 4f 43 28 6e 73 79 6d 73 | 29 3b 0d 20 20 20 20 69 |OC(nsyms|);. i|
|00002b10| 66 20 28 6e 75 6c 6c 61 | 62 6c 65 20 3d 3d 20 30 |f (nulla|ble == 0|
|00002b20| 29 20 6e 6f 5f 73 70 61 | 63 65 28 29 3b 0d 0d 20 |) no_spa|ce();.. |
|00002b30| 20 20 20 66 6f 72 20 28 | 69 20 3d 20 30 3b 20 69 | for (|i = 0; i|
|00002b40| 20 3c 20 6e 73 79 6d 73 | 3b 20 2b 2b 69 29 0d 09 | < nsyms|; ++i)..|
|00002b50| 6e 75 6c 6c 61 62 6c 65 | 5b 69 5d 20 3d 20 30 3b |nullable|[i] = 0;|
|00002b60| 0d 0d 20 20 20 20 64 6f | 6e 65 20 3d 20 30 3b 0d |.. do|ne = 0;.|
|00002b70| 20 20 20 20 77 68 69 6c | 65 20 28 21 64 6f 6e 65 | whil|e (!done|
|00002b80| 29 0d 20 20 20 20 7b 0d | 09 64 6f 6e 65 20 3d 20 |). {.|.done = |
|00002b90| 31 3b 0d 09 66 6f 72 20 | 28 69 20 3d 20 31 3b 20 |1;..for |(i = 1; |
|00002ba0| 69 20 3c 20 6e 69 74 65 | 6d 73 3b 20 69 2b 2b 29 |i < nite|ms; i++)|
|00002bb0| 0d 09 7b 0d 09 20 20 20 | 20 65 6d 70 74 79 20 3d |..{.. | empty =|
|00002bc0| 20 31 3b 0d 09 20 20 20 | 20 77 68 69 6c 65 20 28 | 1;.. | while (|
|00002bd0| 28 6a 20 3d 20 72 69 74 | 65 6d 5b 69 5d 29 20 3e |(j = rit|em[i]) >|
|00002be0| 3d 20 30 29 0d 09 20 20 | 20 20 7b 0d 09 09 69 66 |= 0).. | {...if|
|00002bf0| 20 28 21 6e 75 6c 6c 61 | 62 6c 65 5b 6a 5d 29 0d | (!nulla|ble[j]).|
|00002c00| 09 09 20 20 20 20 65 6d | 70 74 79 20 3d 20 30 3b |.. em|pty = 0;|
|00002c10| 0d 09 09 2b 2b 69 3b 0d | 09 20 20 20 20 7d 0d 09 |...++i;.|. }..|
|00002c20| 20 20 20 20 69 66 20 28 | 65 6d 70 74 79 29 0d 09 | if (|empty)..|
|00002c30| 20 20 20 20 7b 0d 09 09 | 6a 20 3d 20 72 6c 68 73 | {...|j = rlhs|
|00002c40| 5b 2d 6a 5d 3b 0d 09 09 | 69 66 20 28 21 6e 75 6c |[-j];...|if (!nul|
|00002c50| 6c 61 62 6c 65 5b 6a 5d | 29 0d 09 09 7b 0d 09 09 |lable[j]|)...{...|
|00002c60| 20 20 20 20 6e 75 6c 6c | 61 62 6c 65 5b 6a 5d 20 | null|able[j] |
|00002c70| 3d 20 31 3b 0d 09 09 20 | 20 20 20 64 6f 6e 65 20 |= 1;... | done |
|00002c80| 3d 20 30 3b 0d 09 09 7d | 0d 09 20 20 20 20 7d 0d |= 0;...}|.. }.|
|00002c90| 09 7d 0d 20 20 20 20 7d | 0d 0d 23 69 66 64 65 66 |.}. }|..#ifdef|
|00002ca0| 20 44 45 42 55 47 0d 20 | 20 20 20 66 6f 72 20 28 | DEBUG. | for (|
|00002cb0| 69 20 3d 20 30 3b 20 69 | 20 3c 20 6e 73 79 6d 73 |i = 0; i| < nsyms|
|00002cc0| 3b 20 69 2b 2b 29 0d 20 | 20 20 20 7b 0d 09 69 66 |; i++). | {..if|
|00002cd0| 20 28 6e 75 6c 6c 61 62 | 6c 65 5b 69 5d 29 0d 09 | (nullab|le[i])..|
|00002ce0| 20 20 20 20 70 72 69 6e | 74 66 28 22 25 73 20 69 | prin|tf("%s i|
|00002cf0| 73 20 6e 75 6c 6c 61 62 | 6c 65 5c 6e 22 2c 20 73 |s nullab|le\n", s|
|00002d00| 79 6d 62 6f 6c 5f 6e 61 | 6d 65 5b 69 5d 29 3b 0d |ymbol_na|me[i]);.|
|00002d10| 09 65 6c 73 65 0d 09 20 | 20 20 20 70 72 69 6e 74 |.else.. | print|
|00002d20| 66 28 22 25 73 20 69 73 | 20 6e 6f 74 20 6e 75 6c |f("%s is| not nul|
|00002d30| 6c 61 62 6c 65 5c 6e 22 | 2c 20 73 79 6d 62 6f 6c |lable\n"|, symbol|
|00002d40| 5f 6e 61 6d 65 5b 69 5d | 29 3b 0d 20 20 20 20 7d |_name[i]|);. }|
|00002d50| 0d 23 65 6e 64 69 66 0d | 7d 0d 0d 0d 66 72 65 65 |.#endif.|}...free|
|00002d60| 5f 6e 75 6c 6c 61 62 6c | 65 28 29 0d 7b 0d 20 20 |_nullabl|e().{. |
|00002d70| 20 20 46 52 45 45 28 6e | 75 6c 6c 61 62 6c 65 29 | FREE(n|ullable)|
|00002d80| 3b 0d 7d 0d 0d 0d 6c 72 | 30 28 29 0d 7b 0d 20 20 |;.}...lr|0().{. |
|00002d90| 20 20 73 65 74 5f 64 65 | 72 69 76 65 73 28 29 3b | set_de|rives();|
|00002da0| 0d 20 20 20 20 73 65 74 | 5f 6e 75 6c 6c 61 62 6c |. set|_nullabl|
|00002db0| 65 28 29 3b 0d 20 20 20 | 20 67 65 6e 65 72 61 74 |e();. | generat|
|00002dc0| 65 5f 73 74 61 74 65 73 | 28 29 3b 0d 7d 0d 00 00 |e_states|();.}...|
|00002dd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002de0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002df0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002e00| 00 00 01 00 00 00 01 6e | 00 00 00 6e 00 00 00 3e |.......n|...n...>|
|00002e10| 6d 61 73 6b 29 0d 09 09 | 70 72 69 6e 74 66 28 22 |mask)...|printf("|
|00002e20| 20 20 25 73 22 2c 20 73 | 79 6d 62 6f 6c 5f 6e 61 | %s", s|ymbol_na|
|00002e30| 05 6c 72 30 2e 63 02 00 | 00 00 50 61 72 74 53 49 |.lr0.c..|..PartSI|
|00002e40| 54 78 00 00 00 00 00 00 | 00 00 00 01 61 a8 00 00 |Tx......|....a...|
|00002e50| 00 00 50 61 72 74 53 49 | 54 78 00 00 00 00 00 00 |..PartSI|Tx......|
|00002e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002e70| 00 00 a9 80 16 19 00 00 | 00 00 00 00 01 ac 72 6f |........|......ro|
|00002e80| 77 70 2b 2b 3b 0d 09 09 | 6d 61 73 6b 20 3d 20 31 |wp++;...|mask = 1|
|00002e90| 3b 0d 09 20 20 20 20 7d | 0d 09 7d 0d 20 20 20 20 |;.. }|..}. |
|00002ea0| 7d 0d 7d 0d 0d 0d 70 72 | 69 6e 74 5f 66 69 72 73 |}.}...pr|int_firs|
|00002eb0| 74 5f 64 65 72 69 76 65 | 73 28 29 0d 7b 0d 20 20 |t_derive|s().{. |
|00002ec0| 72 65 67 69 73 74 65 72 | 20 69 6e 74 20 69 3b 0d |register| int i;.|
|00002ed0| 20 20 72 65 67 69 73 74 | 65 72 20 69 6e 74 20 6a | regist|er int j|
|00002ee0| 3b 0d 20 20 72 65 67 69 | 73 74 65 72 20 75 6e 73 |;. regi|ster uns|
|00002ef0| 69 67 6e 65 64 20 2a 72 | 70 3b 0d 20 20 72 65 67 |igned *r|p;. reg|
|00002f00| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 00 00 14 |...H..Mo|naco....|
|00002f10| 00 06 11 58 00 0a 01 59 | 02 0f 01 69 02 1d 00 00 |...X...Y|...i....|
|00002f20| 00 00 00 14 00 06 00 06 | 00 04 00 50 00 20 01 dd |........|...P. ..|
|00002f30| 02 3d 00 50 00 20 01 dd | 02 3d a5 1f c1 72 00 00 |.=.P. ..|.=...r..|
|00002f40| 00 00 00 00 00 00 00 00 | 2c cb 01 00 00 00 00 1e |........|,.......|
|00002f50| 00 50 00 20 01 dd 02 3d | 00 50 00 20 01 dd 02 3d |.P. ...=|.P. ...=|
|00002f60| 00 00 2c cb 00 00 00 00 | 00 00 00 00 00 00 00 00 |..,.....|........|
|00002f70| 01 00 00 00 01 6e 00 00 | 00 6e 00 00 00 3e 00 51 |.....n..|.n...>.Q|
|00002f80| 36 ac 08 d2 00 00 00 1c | 00 3e 00 00 4d 50 53 52 |6.......|.>..MPSR|
|00002f90| 00 01 00 0a 03 ed ff ff | 00 00 00 00 00 00 00 00 |........|........|
|00002fa0| 03 f0 ff ff 00 00 00 4c | 00 57 46 e0 00 00 00 00 |.......L|.WF.....|
|00002fb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002fc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002fd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002fe0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+